Программа нахождения произведения нечетных цифр - вопрос №16942243040 от ооооооолл 03.04.2021 02:01

Question

Информатика: Программа нахождения произведения нечетных цифр двузначных чисел от 30 до 40. напишите на паскаль.

ооооооолл · Answer

Var a,i:integer;BeginA:=1;For i:=30 to 40 doBeginIf i mod 10 mod 2 =1 thenA:=a*(i mod 10);If i div 10 mod 2 =1 thenA:=a*(i div 10);End;End....