Предмет: Информатика,
автор: Аня43536
Составьте программу, которая формирует массив, содержащий 16 случайных вещественных чисел от -2 до 3, и подсчитывает сумму отрицательных чисел. Вывод столбец с двумя десятичными знаками.
Ответы
Автор ответа:
0
program zadacha;
vara: array[1..16] of real;i: integer;sum: real;
beginsum:=0;for i:=1 to 16 do begina[i]:=-2+random(3);writeln(a[i]:6:2);if a[i]<0 then sum:=sum+a[i];end;writeln();writeln('sum=',sum:4:2);end.
vara: array[1..16] of real;i: integer;sum: real;
beginsum:=0;for i:=1 to 16 do begina[i]:=-2+random(3);writeln(a[i]:6:2);if a[i]<0 then sum:=sum+a[i];end;writeln();writeln('sum=',sum:4:2);end.
Приложения:

Похожие вопросы
Предмет: Математика,
автор: vikasadykova2008
Предмет: Английский язык,
автор: vanastasia1210
Предмет: Алгебра,
автор: cavahir10
Предмет: Физика,
автор: Аноним