Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
уточни ато очень много ошибок место то го что бы писать как надо пишешь набор букв на English
Объяснение:
program xxx;
var i, n, s : integer;
begin
write('введите число n=');
readln(n);
s: =0;
i: =2;
while i< =n do
s: =s+i;
i: =i+2
end;
write('сумма четных чисел =', s);
readln
end.
64000*16=1024000 б=128000 б=125 кб
Популярные вопросы