Определить произведение первой и последней цифры числа,вводимого с клавиатуры
danypapajoy8eeo
2
27.05.2019 13:30
0
Другие вопросы по теме Информатика
Angelina12323
01.10.2019 20:40
dashatyueet
01.10.2019 20:40
1amon1
17.05.2020 15:09
Turtle183119
17.05.2020 15:09
Afon7
17.05.2020 15:09
английскийязык14
17.05.2020 15:10
mashasmirnova1704
09.09.2021 15:34
эмирия
29.03.2019 11:26
vanyaver
29.03.2019 11:24
zlata25148
29.03.2019 11:20
Популярные вопросы
- Март уходит придет апрель. В лесу еще светло деревья НЕ распустились. Но...
3 - Составить электронные и структурные формулы строения молекул: СН4, РН3, Вr2,...
2 - = Подчеркни главные члены предложения и выпиши словосочетания.Деревья оделись...
2 - Из 16 кг хлопкового семени получили 4 кг масла. Укажи, сколько масла получится...
2 - На титрование 140 мл раствора H3AsO4 (плотностью 1,094г/см3) с образованием...
1 - Почему обитатели уездного города, где городничим был Сквозник-Дмухановский,...
1 - Use the words in brackets to make Second Conditional sentences. What (you/do)...
3 - У циліндричній посудині під поршнем, площа якого 10 см2, міститься вода за...
1 - 1) If I better tomorrow, I will be back at work. feel work will feel go 2)...
2 - Сплав складажиття з міді (50 %), цинку (40 %) і алюмінію (10 %). Чом у дорівнює...
3
A,p:integer;
begin
Write('Введиnе число:');
Readln(A);
p:= A mod 10;
while A > 9 do
A:=A div 10;
p:=p*A;
WriteLn(p);
Readln;
end.