Светлана96
Опубликовано 7 лет назад по предмету Информатика от Светлана96


Выведите все точные квадраты натуральных чисел, не превосходящие данного числа N. Формат входных данных Задано единственное число N. Формат выходных данных Необходимо вывести все точные квадраты натуральных чисел, не превосходящие данного числа N.

  1. Ответ
    Ответ дан sinbad7

    var 

    i,n:integer;

    begin

    readln(n);

    for i:=1 to n-1 do write(i*i:5);

    end.

Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц