Составить программу. с клавиатуры вводятся 10 чисел. составьте программу , которая определяет произведение отрицательных среди введенеых чисел
УмныйАутист
1
21.08.2019 14:20
1
Другие вопросы по теме Информатика
mazaso
09.08.2019 14:30
mashapa2001
12.03.2019 12:19
лёхыч3
12.03.2019 12:22
anonimm852
25.10.2020 21:13
Oxico127
25.10.2020 21:13
Rustam20022017
18.09.2019 21:30
Jaims
18.09.2019 21:30
MartinaStoessel2
02.12.2021 18:40
Популярные вопросы
- Постройте график функции у=5х-4.пользуясь графиком, найдите: 1)значение функции,...
2 - Принадлежит ли графику функции у=-х/3 точка а(9; -3) как решать...
2 - Почему listen to the radio а не по-другому?...
3 - 6класс на почте продается 8 различных конвертов и 4 различные марки. сколько...
2 - Вкаком из этих слов при образовании прилагательного появляется чередование...
1 - Стены ,на опушках ,силу,ветра. в каких из этих слов звуком больше ,чем букв....
2 - Слово з одним коренем трьома суфіксами і закінченням...
2 - 5речень з однорідними членами реченя...
1 - 1) дано : k = 64*64 n = 256 найти: i - ? 2) дано: k = 128*128 i = 4 кбайт...
1 - Какие растения называют засухостойчивыми раскрой значение этого слова...
2
var a,p: real;
i: integer;
begin
p:=1;
for i:=1 to 10 do
begin
readln(a);
if a<0 then p:=p*a;
end;
writeln(p);
end.