Задать вопрос
25 сентября, 09:33

13. Напишите программу находящую сумму квадратов чисел от 1 до N. Где N вводится с клавиатуры.

+4
Ответы (1)
  1. 25 сентября, 12:56
    0
    Var n, s, i:integer;

    begin

    write ('n='); readln (n);

    s:=0;

    for i:=1 to n do s:=s+i*i;

    writeln ('s=', s)

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «13. Напишите программу находящую сумму квадратов чисел от 1 до N. Где N вводится с клавиатуры. ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы