• Вопрос по информатике:

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

    • Автор:

      melina
  • Что это значит?writeln(i,'^2= ',sqr(i));
    • Отвечал:

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

      roxyxdgy

    Ответ:

    Объяснение:

    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
    • Отвечал:

      torressuhu

    Ответов нет, но ты это испарвиш!