Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var
i,s: integer;
begin
s: =0;
for i: =2 to 5 do
s: =s+i*i;
writeln(s);
end.
var a,b,c,d,e: real;
read(a,b,c,d);
e: =(a+b+c+d)/4;
writeln(e: 0: 4);
Популярные вопросы