Категория - Информатика Автор - katy0865 7 лет назад Напишите программный код к следующей задаче: Организовать беспрерывный ввод чисел с клавиатуры, пока пользователь не введёт нуль. После ввода нуля, показать на экране количество чисел, которые были введены, их общую сумму и среднее арифметическое.Срочноооооо!
Категория - Информатика Автор - katy0865 7 лет назад Напишите программный код к следующей задаче: Организовать беспрерывный ввод чисел с клавиатуры, пока пользователь не введёт нуль. После ввода нуля, показать на экране количество чисел, которые были введены, их общую сумму и среднее арифметическое.Срочноооооо!
Ответ Автор - renathalimov71p2gare program mm;var sum, sred, a, n:Real;beginsum:=0;a := 0;Read(n);while n<>0 do begina:=a + 1;sum := sum + n;sred := sum/a;Read(n);end;WriteLn('Colichestvo:', a);WriteLn('Spednee:', sred);WriteLn('Summa:', sum);end.Вот решение.