Question

Турбо Паскаль использование цыкла for . Написать програму которая выводит таблицу квадратов первых пяти целых чисел. ПЛИЗ ОЧЕНЬ НАДО)))

Answer 1

Программа выводит сами числа и их квадраты

Program Square5;

Uses crt;

var i:integer; 

begin

     clrscr;

      for i:=1 to 5 do

        writeln(i,'  ',i*i );      

    readkey;

 

end. 

 

 

Answer 2

Конечно, я могу помочь с этой задачей! Вот пример кода на Turbo Pascal с использованием цикла for для вывода таблицы квадратов первых пяти целых чисел:

arduinoCopy code
program squares;

var
  i, square: integer;

begin
  writeln('Table of squares:');
  for i := 1 to 5 do
  begin
    square := i * i;
    writeln(i, ' squared is ', square);
  end;
end.

Результат работы программы:

csharpCopy code
Table of squares:
1 squared is 1
2 squared is 4
3 squared is 9
4 squared is 16
5 squared is 25

Надеюсь, это поможет вам решить задачу! Если у вас есть какие-либо вопросы, пожалуйста, не стесняйтесь задавать их.