Заполнить массив по формуле, и вычислить сумму элементов - PascalABC.NET
Формулировка задачи:
Заполнить массив значениями, вычисляемыми по формуле: a[i]:=sin i*i2 Вывести элементы этого массива на экран компьютера и найти сумму всех значений.
Решение задачи: «Заполнить массив по формуле, и вычислить сумму элементов»
textual
Листинг программы
program pr; var a:array [1..100] of real; i,n:integer; begin writeln('Введите размер массива'); readln(n); for i:=1 to n do begin a[i]:=sin(i*(i*i)); // если ты имел ввиду sin(i*i^2) write(' ',a[i]:3); end; end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д