Ниже записана программа получив на вход число x эта программа печатает 2 числа a и b 2 и 72
var x, a, b: integer;
begin
readln(x);
a:=0; b:=1;
while x>0 do begin
a:=a+1;
b:=b*(x mod 10);
x:= x div 10;
end;
writeln(a); write(b);
end.

Nasteckay Nasteckay    1   29.05.2020 20:50    1

Ответы
semyanivskyilly semyanivskyilly  24.08.2020 22:46

Для нужного ответа можно ввести 89 или 98.


Ниже записана программа получив на вход число x эта программа печатает 2 числа a и b 2 и 72 var x, a
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика