Написать программу, вычисляющую сумму и среднее арифметическое ...
Написать программу, вычисляющую сумму и среднее арифметическое последовательности положительных чисел, которые вводятся с клавиатуры. вид экрана: Введите числа. Для завершения последовательности нажмите ноль. 45 23 15 0 введено чисел:3 сумма чисел:83 Среднее арифметическое:27.67 С ЦИКЛОМ While do пожалуйста напишите а не с Repeat untill
Есть ответ
17.12.2022
164
Ответ
program z8;uses crt;vari,k,n:byte;s:integer;sa:real;beginclrscr; i:=1;writeln('Для завершения последовательности нажмите ноль');while i>0 do beginread(i);
write(' '); {- нужен, чтобы числа нормально смотрелись}if i>0 then begink:=k+1;s:=s+i;end; end;sa:=s/k;write('введено чисел:',k,' сумма чисел:',s,'Среднее арифметическое:',sa:4:2);readkeyend.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022
