Найти призведение целых числет от а до 20. Значение а вводится с клавиатуры: 1<=а<=20

Ответы:

Ленчик Нахимова

08-09-2011 06:42

Program pr1;vara,i:integer;p:int64;beginp:=1;readln(a);for i:=a to 20 dop:=p*i;writeln(p);end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Амелия Горохова

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Найти призведение целых числет от а до 20. Значение а вводится с клавиатуры: 1<=а<=20» от пользователя Амелия Горохова в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!