Решите плз что знаете
Приложения:
Ответы на вопрос
Ответил farodis
0
2) var a:integer;
begin
for a:=-10 to 10 do
writeln(a);
end.
3)var a:integer;
begin
for a:=20 downto -5 do
writeln(a);
end.
4)var a:integer;
begin
writeln('Число',' Квадрат');
for a:=-10 to 10 do
writeln(a,' ',sqr(a));
end.
Новые вопросы