Вот
Объяснение:
var
i: integer;
summa: integer;
begin
for i := 1 to 49 do
if (i/2) <> (i div 2) then summa := summa + i;
end;
end.
Чтобы вывести полученную сумму, используйте writeln(summa); между "end;" и "end.".
Удачи :)
Вот
Объяснение:
var
i: integer;
summa: integer;
begin
for i := 1 to 49 do
begin
if (i/2) <> (i div 2) then summa := summa + i;
end;
end.
Чтобы вывести полученную сумму, используйте writeln(summa); между "end;" и "end.".
Удачи :)