Вывести на экран таблицу квадратов - PascalABC.NET

Узнай цену своей работы

Формулировка задачи:

Квадраты Нужно вывести на экран таблицу квадратов. Input Со стандартного устройства ввода вводится 1 натуральное число – N, не превосходящее 100. Output Нужно выдать на стандартное устройство вывода N строк вида K^2 = M где M – одно целое число, являющееся квадратом числа K, и числа K идут по возрастанию от 1 до N. 1^2 = 1 2^2 = 4 3^2 = 9 4^2 = 16 5^2 = 25 ТАКОЕ СОСТАВЛЕНИЕ ПРОГРАММЫ НЕ ВЕРНО!! НУЖНО ЕЩЕ С ПЕРЕМЕННОЙ М СОСТАВИТЬ!! ЗАРАНЕЕ СПАСИБО

Решение задачи: «Вывести на экран таблицу квадратов»

textual
Листинг программы
program test;
var N, K, M:integer;
begin
read (N);
for K:=1 to N do
 begin
  M:=sqr(K);
  writeln(K, '^2=',M);
  end;
end.

Объяснение кода листинга программы

В данном коде выполняется следующие действия:

  1. В первой строке объявляются три переменные типа integer: N, K, M. Переменная N инициализируется значением, которое считывается с помощью функции read().
  2. Во втором блоке кода выполняется цикл for, который начинается с K=1 и выполняется до тех пор, пока K меньше или равно N.
  3. Внутри цикла вычисляется значение переменной M как квадрат значения переменной K с помощью функции sqr().
  4. Значение переменной M выводится на экран с помощью функции writeln(). При этом в качестве аргументов функции writeln() используются переменная K и строка, представляющая собой квадрат значения переменной K, заключенная в кавычки.
  5. После завершения цикла выполняется завершающий блок кода, который включает в себя закрытие фигурных скобок и завершение программы.

Оцени полезность:

8   голосов , оценка 3.625 из 5
Похожие ответы