Запишите на языке паскаль программу, которая для двухзначного случайного числа определяет произведение его цифр

slava452163525 slava452163525    3   21.08.2019 22:40    0

Ответы
remixzx60 remixzx60  09.08.2020 16:58
Program n1;
var a,p: integer;
begin
randomize;
a:=random(90)+10;
p:=(a mod 10)*(a div 10);
writeln('произведение цифр числа ',a,' равно ',p);
end.
ПОКАЗАТЬ ОТВЕТЫ
SchillerAlice SchillerAlice  09.08.2020 16:58
Program Proiz;var a:integer;begin a:=Random(100); writeln('Случайное число а равно ',a); //Можно это и не писать a:=(a mod 10)*(a div 10); writeln(a)end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика