Найти сумму и произведение всех нечетных двухзначных - вопрос №1401699 от крыска235 06.12.2021 00:47

Question

Информатика: Найти сумму и произведение всех нечетных двухзначных чисел (алгоритм и программу)

крыска235 · Answer

Program z_number; uses crt; var pr,i:integer; begin clrscr; pr:=1; i:=11;{Первое двузначное нечетное число} repeat pr:=pr*i; i:=i+2; until(i 100); writeln( Произведение двузначных нечетных чисел ,pr); readln; end....