Вводя числа с клавиатуры без ограничения их количества(конец ввода число 0),найдите сумму положительны хи произведение отрицательных чисел.написать в программе e6 и e7 в abc паскале.это оператор варианта.нужно решить
ваня1358
1
20.05.2019 05:50
3
Другие вопросы по теме Информатика
GEgor004
28.06.2019 12:50
Серафим6776
02.10.2019 07:50
VladeEZ
02.10.2019 07:50
funfup
02.10.2019 07:50
Polina011020040
15.11.2020 21:34
mamamama9
25.11.2020 07:53
selbianaosmanov
25.11.2020 07:54
Владислав15351
24.04.2020 12:18
pelmenev777
24.04.2020 12:18
Популярные вопросы
- Поворачивай свой кубики раскрашивай грани нарисунках. математика 3 класс...
1 - Плiз ответ нужен 5 завдання не 1....
1 - Опитьсать что происходит на картинке и так далеевсе 3 картинки...
1 - 7. 28 : 3 — 57 98 – 23 - 4 + 24 34 + 13 : 5 28 : 2 — 13 - 4 (49 + 28) : 7 (64...
3 - Составьте диаграмму Венна Почему Карл 1 и Осман 2 не смогли стать абсолютным...
2 - 22.7. Упростите ввражение(2;3;4) Сейчас 21:35, мне до 10:00 надо...
1 - 3. Определите функционально-стилевую принадлежность текста. Обоснуйте свою точку...
1 - Преобразуйте тезисы статьи “Великий шелковый путь: торговля, товары” в реферат....
3 - 25. Find the correct sentence. A) These are the girls pens.B) These are the...
2 - Назовите три примера заголовка клише...
2
var
a, s_p, s_o: integer;
begin
s_o := 1;
s_p := 0;
repeat
readln(a);
if(a < 0) then s_o := s_o * a else
s_p := s_p + a;
until(a = 0);
writeln('Произведение отр.: ', s_o);
writeln('Сумма пол.: ', s_p);
end.