var
s1 : integer; // сумма четных чисел
s2 : integer; // сумма всех чисел
begin
for var i := 50 to 120 do begin
if i mod 2 = 0 then s1 += i;
s2 += i;
end;
writeln('сумма четных чисел = ', s1);
writeln('сумма всех чисел = ', s2);
end.
Индийский океан больше, чем Северно-Ледовитый ( А также Южный океан, который пока не относят к отдельному океану),, но меньше Атлантического океана или Тихого океана.
Танганьика глубже, например, Азовского моря ,, но мельче Байкала.
Ну ты просто выдумал себе сложности, при вызове F она выведет 9, паскаль не знаю, но точно утверждаю, что это так.
Сначала идёт вывод переменной а потом операции с ней, ничего додумывать не нужно.