Предмет: Информатика,
автор: Margo57
Напишите программу нахождения суммы положительных нечетных чисел меньших 100
Ответы
Автор ответа:
0
var a,b,c: integer;begin
a:=1;
while a<100 do
begin
c:=c+a;
a:=a+1;
end;
writeln(c);
end.
a:=1;
while a<100 do
begin
c:=c+a;
a:=a+1;
end;
writeln(c);
end.
Похожие вопросы
Предмет: Литература,
автор: olgastankova228
Предмет: Биология,
автор: vladrudenko
Предмет: Литература,
автор: elnarasulejmanova426
Предмет: Литература,
автор: НезабываЭмая