Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

30 баллов дана последовательность 4.5; -3.1; 2.1;1.8;0.13;-1.6;1.7;0.3 вещественных чисел.составить программу которая находит число отрицательных членов последовательности

Ответ оставил Гость

Запускаешь программу и пишешь сначала количество чисел в твоей последовательности: 8, далее вводишь свои числа.

var n,i,k:integer;   
a:real; 
begin 
read(n); 
while iread(a);   
if (a<0) then k:=k+1; i:=i+1;   
end;   
writeln(k);   
end.