Есть ответ 👍

Програма СКРЕТЧ

Складіть проект, у якому виконавець 4 рази зіграє деяку мелодію, якщо буде натиснуто клавішу пропуск, або переміститься на 100 кроків униз, якщо буде натиснуто клавішу стрілка вниз. Збережіть проект у файлі під назвою завдання _1.

255
350
Посмотреть ответы 1

Ответы на вопрос:


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.

Популярно: Информатика