Регистрация
batkia228
28.05.2022 15:20
Информатика
Есть ответ 👍

Найти произведения цифр входящих в состав данного трёхзначного числа. 20 .

265
323
Посмотреть ответы 2

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

kotia1799
kotia1799
4,6(87 оценок)
Program enot; var i,a,b,s: integer; begin read(a); b: =1; s: =1; for i: = 1 to 3 do begin b: =a mod 10; s: =s*b; a: =a div 10; end; write(s); end.
суады
суады
4,5(50 оценок)

на паскале:

 

program ostatok; var c: integer; beginwriteln('введите число с.'); readln(c); writeln('остаток от деления ',c,' на 10, возведенный в квадрат, равен ',sqr(c mod 10)); end.

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