1. Информатика
  2. Найти среднее арифметическое

Найти среднее арифметическое квадратов всех целых чисел от 1 до 100. программа в паскале

Jkbts Jkbts    1   04.06.2019 12:10    1

Ответы
tima2411 tima2411  05.07.2020 12:57
Var
   i:integer;
   s:real;
begin
for i:=1 to 100 do s:=s+i*i;
s:=s/100;
writeln('Среднее квадратов первых 100 чисел: ',s)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
mavikon mavikon  19.10.2021 02:52
с лабораторной работой. Написать програму на С++ по условию. Если кто знает как. Буду благодарен....
mandarinka3001 mandarinka3001  19.10.2021 02:56
Числом в нормальной форме с нормализованной мантиссой (правильной дробью, имеющей после запятой цифру, отличную от нуля) является: 0,341 x 109 213,5629 1997 0,002311...
azolin56745674 azolin56745674  19.10.2021 02:58
Добавьте в проект перечисленные возможности. 2.1. Оси координат со стрелками и подписями. 2.2. Единичный отрезок на оси X. 2.3. График функции y = 0.3x2 – 4x + 2, в той же системе...
вика87 вика87  19.10.2021 02:58
Не (x = 35) или (x не делится на 16)...
Izolda111 Izolda111  19.10.2021 02:59
Информатика 35б, подскажите...
madisha12 madisha12  24.03.2022 04:41
Сколько букв содержит алфавит, если сообщение из 25 строк по 64 символа, закодированное с его имеет размер 100 Кбайт. С формулами...
vlada23912 vlada23912  24.03.2022 05:04
Дано натуральное число N. Выведите слово YES, если число N является точной степенью двойки, или слово NO в противном случае нужно написать код на c++ используя цикл while...
alinaozhiganova alinaozhiganova  24.03.2022 05:15
Фрагмент-это.. 1.Прямоугольная часть рисунка любого размера2.Файл с рисунком 3.Произвольная часть рисунка 4.Рисунок-очистить...
Anuliks Anuliks  28.06.2019 16:50
Написать программу в pascal числа a,b и c вводятся с клавиатуры.найти max(a,a+b)+max(a,b+c)/1+max(a+b*c,1,5)...
vladiev vladiev  13.04.2020 10:47
В чём преимущества и недостатки внутристраничных внутри системных и межсистемных гиперссылок​...

Популярные вопросы