"вычисление среднеарифметического последовательно вводимых чисел" остановить обработку при"…вводе третьего отрицательного значения, которое рассматривать как признака конца, а не число" тип обраб. данных"веществ." написать программу в паскале. 79
288
302
Ответы на вопрос:
Var a, sa: real; i, k: integer; begin k: =0; sa: =0; i: =0; while k< 3 do begin read (a); if a< 0 then k: =k+1; if k< 3 then begin sa: =sa+a; i: =i+1; end end; sa: =sa/i; writeln (sa) end.
Популярно: Информатика
-
fdsufsycdst26.09.2022 15:09
-
МарвиСК05.10.2020 16:48
-
алпплла23.01.2020 14:43
-
GEORGYBAZAEV02.08.2022 14:45
-
Allery08.01.2021 15:16
-
Просточеловек77728.02.2023 13:55
-
nastyluk12508.12.2021 08:19
-
SMAYLITOP05.08.2020 05:27
-
Даша33355527.09.2022 00:16
-
Kovalenko2001N01.12.2022 15:30