• Написать программу печати квадратов всех натуральных чисел от 1 до n. Паскаль, цикл-for. Пожалуйста помогите,очень нужно!!!!!

Ответы 3

  • Что это значит?writeln(i,'^2= ',sqr(i));
  • вывести текст i^2= и значение квадрата. вместо sqr(i) можете написать i*i. тоже будет квадрат. На фото результат для n=10
  • Ответ:

    Объяснение:

    var n,i:integer;

    begin

    write('Введите N ');

    readln(n);

    for i:=1 to n do

    writeln(i,'^2= ',sqr(i));

    readln;

    end.

    Если уж совсем просто, то:

    var n,i:integer;

    begin

    write('Введите N ');

    readln(n);

    for i:=1 to n do

    writeln(i*i);

    readln;

    end.

    answer img
    • Автор:

      shaylee
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years