Вывести таблицу чисел от 30 до 40 и их квадратов.Составить блок схему

Question

Вывести таблицу чисел от 30 до 40 и их квадратов.Составить блок схему

Answer 1

Pascal:
program Project;
var
  i, q:integer;
begin
  for i:=30 to 40 do
  begin
     q:=sqr(i);
     write(i,' ',q);
  end;
end.

---

Comments

Вместо write напиши Writeln только

---

так как таблица нужна же