Написать программу каторая вычислит (1+1^2)+(1+2^2)+...+(1+n^2) n ввести с клавиатуры! - Pascal
Формулировка задачи:
написать программу каторая вычислит (1+1^2)+(1+2^2)+...+(1+n^2) n ввести с клавиатуры!
Решение задачи: «Написать программу каторая вычислит (1+1^2)+(1+2^2)+...+(1+n^2) n ввести с клавиатуры!»
textual
Листинг программы
var i,n:integer;
s:real;
begin
write('n=');
readln(n);
s:=0;
for i:=1 to n do
s:=s+1+i*i;
write('S=',s:0:0);
readln
end.
Объяснение кода листинга программы
- Объявление переменных:
- i, n: integer (целочисленные переменные i и n)
- s: real (реальная переменная s)
- Ввод значения переменной n с клавиатуры: write('n='); readln(n);
- Инициализация переменной s значением 0: s := 0;
- Цикл вычисления суммы: for i := 1 to n do begin s := s + (1 + i * i); end;
- Вывод результата: write('S=', s:0:0);
- Чтение символа для завершения работы программы: readln;
- Завершение программы.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д