вывести на экран все числа от 10 до -10, затем квадраты

Вывести на экран все числа от 10 до -10, потом квадраты этих чисел

Задать свой вопрос
Перпериди Есения
программку необходимо?
Вадик Смолененков
pascal ABC
1 ответ
Program z;  var i:integer;begin  for i:=-10 to 10 do    begin      write(i,' ');    end;writeln();  for i:=-10 to 10 do    begin      write(sqr(i),' ');    end;end.
Илюшка Штуков
https://pastebin.com/znKAj3Vb
Вадим Сацхетдинов
ссылка на читаемый код
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт