Предмет: Информатика,
автор: wikrik
составить программу вычисления суммы нечётных чисел от 1 до 99.
Ответы
Автор ответа:
0
var i,s:integer;
begin
s:=0;
for i:=1 to 99 do
if (i mod 2=1) then inc(s,i);
writeln(s)
end.
Интересные вопросы
Предмет: Математика,
автор: smorosova798
Предмет: Қазақ тiлi,
автор: okpok
Предмет: География,
автор: Аноним
Предмет: Алгебра,
автор: Князь3313
Предмет: Литература,
автор: zxcvbnm7777