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