Предмет: Информатика,
автор: Рубали
Найти сумму и произведение всех нечетных двухзначных чисел (алгоритм и программу)
Ответы
Автор ответа:
0
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.
Похожие вопросы
Предмет: Литература,
автор: seyorili478
Предмет: Алгебра,
автор: ctepan200646
Предмет: Қазақ тiлi,
автор: ekaterinapanasenko20
Предмет: История,
автор: nutellaaaaaaaaaa
Предмет: Математика,
автор: Leralee