Найти сумму и произведение всех нечетных двухзначных - вопрос №1401474 от Vladimirhdjdn 19.03.2023 14:40

Question

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

Vladimirhdjdn · 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....