Напишите программу, которая суммирует все числа в - вопрос №43211439327 от maksalina2 14.05.2020 19:24

Question

Информатика: Напишите программу, которая суммирует все числа в диапазоне от 4 до 32 и вычисляет их среднее арифметическое, выводит эти числа на экран в строчку и на отдельных строках выводит сумму и среднее арифметическое ОЧЕНЬ ВАЖНО! ДАМ ВЫСШУЮ НАГРАДУ

maksalina2 · Answer

var

S,SA:real;

i,k:integer;

begin

S:=0;

SA:=0;

for i:=4 to 32 do

begin

S:=S+i;

k:=k+1;

end;

SA:=S/k;

write('Sum = ',S,' Arithmetic mean = ',SA);

end.

Объяснение: