Запишите на языке паскаль программу, которая для двухзначного случайного числа определяет произведение его цифр
274
406
Ответы на вопрос:
Program n1; var a,p: integer; begin randomize; a: =random(90)+10; p: =(a mod 10)*(a div 10); writeln('произведение цифр числа ',a,' равно ',p); end.
Program proiz; var a: integer; begin a: =random(100); writeln('случайное число а равно ',a); //можно это и не писать a: =(a mod 10)*(a div 10); writeln(a)end.
Цикл завершится тогда, когда значение переменной i станет равно 0 ответ: i: =3;
Популярно: Информатика
-
madamburkova2011.08.2021 10:12
-
dashakechenkova29.06.2020 01:37
-
lolilol202.11.2021 21:49
-
ali000217.09.2022 22:44
-
Djzhdujd30.09.2021 18:37
-
snsn27.02.2021 08:31
-
RaiderUp24.02.2022 05:53
-
Lartenok04.12.2022 11:25
-
Данил2864515.10.2020 16:10
-
wolfe816.09.2022 17:45