Предмет: Информатика,
автор: adailimanov2005
Помогите с Паскалем!
Приложения:

Ответы
Автор ответа:
1
1)
var
i:integer;
begin
for i:=-5 to 5 do
writeln (i)
end.
2)
var
i,n:integer;
begin
readln(n);
for i:=1 to n do
writeln (sqr(i))
end.
3)
var
i,sum:integer;
begin
for i:=10 to 20 do
sum:=sum+i;
writeln(sum);
end.
Похожие вопросы
Предмет: Қазақ тiлi,
автор: SilverStoorm
Предмет: Русский язык,
автор: dumanyan2001
Предмет: Русский язык,
автор: nastya13311
Предмет: География,
автор: belka1002