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.

Answer 2

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

Answer 3

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