tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Склавиатуры вводится число n,
Склавиатуры вводится число n, а затем n чисел. найти произведение отрицательных.
belovomp
1 11.09.2019 22:20
0
Ответы
xxx5639
07.10.2020 08:31
Program Ok;
var a,i,n,proiz:integer;
begin
readln(N);
proiz:=1;
for i:=1 to n do
begin
read(a);
if(a<0) then
proiz:=proiz*a;
end;
write(proiz);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
maulee502owkszf
17.04.2020 18:55
Засобами табличного процесора створіть електронну таблицю для визначен-ня об єму газу за нормальних умов....
Помощниица1
17.04.2020 18:55
ПОЖАЙЛУСТА ПРОГРАМА СКРЕТЧ СДЕЛАТЬ ПРОЕКТ ЕСЛИ НЕ ДЕЛАЕТЕ НЕ ОТВЕЧАЙТЕ1. Запустити Scratch. Вирізати спрайт Кіт. 2. Імпортувати сцену, на якій зображено морський пейзаж(папка...
Armen200012
17.04.2020 18:55
1. Дано натуральное число. Вывести на экран все натуральные числа до заданного включительно. При проверке программы введите значение 10000. program Natural_Number; var...
dpil900dima
17.04.2020 18:54
Как называется это функция в информатике ...
Kaska322
17.04.2020 18:54
-Подготовьте в word-файл 2 таблици: a)Поколение ЭВМ с основными характеристиками : поколение , элементная база, габариты , быстродействие. b)Классификацию програмного...
KUROCHKA777
17.04.2020 18:54
Форма - це... Виберіть один з 4 варіантів відповіді: 1) створена користувачем таблиця 2) надання користувачеві зручних засобів для введення даних у таблицю 3) результат...
Stellamaric
08.09.2019 09:50
Сумма чётных и произведение нечетных значений диапазона 100-1000...
grenzygaming
08.09.2019 09:50
Сколько кбайт состовляет сообщение,содержащее 6.5 мбайт...
arnalismailov
08.09.2019 09:50
Информационное сообщение объемом 3 кбайта содержит 4096 символов. сколько симвалов содержит алфавит, при которого было записано это сообщение...
Goodsteve31
06.09.2019 08:20
Какое из перечисленных ниже слов можно зашифровать в виде кода $%$# ? удод, мама, реле, обоз...
Популярные вопросы
Две бутылки а и в заполнены водой. сначала 1/4 воды из а перелили...
3
Мотоциклист полпути ехал со скоростью 100 км/ч, а остаток пути — со...
3
Скажите все твердые,жидкие и газообразные вещества. зарание !...
2
Признаки препятствующие самоопылению растений...
1
Решите уравнение 72разделить на б+13=19...
3
Какие животные излучают свет ( их имена)...
3
Напишите из стихотворения а.с.пушкина (19 октября) строки которые...
3
Напишите красивые предложения со словосачитаниями : река шумела и...
2
Водолаз начал работу на губине -25 метров.в ходе работы он изменял...
3
When mr smith up) in the morning the weather was very bad.it ) very...
1
var a,i,n,proiz:integer;
begin
readln(N);
proiz:=1;
for i:=1 to n do
begin
read(a);
if(a<0) then
proiz:=proiz*a;
end;
write(proiz);
end.