Есть ответ 👍

Как найти произведение цифр четырех значного числа на языке паскаль?

170
194
Посмотреть ответы 2

Ответы на вопрос:


Var x,p: integer; begin writeln('введите х: '); readln(x); p: =1; p: = x mod 10; x: =x div 10; p: = p * (x mod 10); x: =x div 10; p: = p * (x mod 10); x: =x div 10; p: = p * x; writeln(p); end.
NeviL1488
4,5(48 оценок)

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

Популярно: Информатика