Програма СКРЕТЧ
Складіть проект, у якому виконавець 4 рази зіграє деяку мелодію, якщо буде натиснуто клавішу пропуск, або переміститься на 100 кроків униз, якщо буде натиснуто клавішу стрілка вниз. Збережіть проект у файлі під назвою завдання _1.
255
350
Ответы на вопрос:
Var a: array[1..100] of integer; i,n,s,k: integer; begin s: =0; k: =0; write('введите кол-во чисел: '); readln(n); write('введите числа: '); for i: =1 to n do read(a[i]); for i: =1 to n do if a[i]< 0 then begin s: =s+a[i]; inc(k); end; if k< > 0 then begin writeln('ср.знач. отрицательных чисел: ',s/k); writeln('сумма отрицательных чисел: ',s); end else writeln('отрицательных членов нет'); end.
Популярно: Информатика
-
Саша03911.03.2020 05:27
-
ellapopova0502.07.2021 12:32
-
daryatitova129.07.2020 13:15
-
Ellenkpop21.11.2022 08:17
-
ss030703126.03.2023 19:32
-
derkioptu18.03.2023 09:51
-
pvi00o2mailru13.08.2020 02:33
-
NastyaSukorkina08.04.2023 14:55
-
crustiYurasova18.06.2021 08:04
-
slothy22.09.2020 13:01