1. Информатика
  2. Напишите программу на

Напишите программу на паскале для вычисления произведение отрицательных. количество введенных чисел неизвестно, 0 – признак окончания ввода чисел.

ktjy123 ktjy123    3   16.09.2019 10:40    2

Ответы
daeinam095 daeinam095  07.10.2020 19:31
//PascalABC.NET
//Версия 3.3, сборка 1611
begin
write(ReadSeqIntegerWhile(x->x<>0).Where(x->x<0).Aggregate(BigInteger(1),(x,y)->(x*y)));
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
карамелька5555 карамелька5555  15.11.2020 14:14
Скільки клітинок у діапазоні B6:E10​...
Семрал Семрал  15.11.2020 14:14
По таблице постройте дерево позволяющее изобразить все пути между пунктами A и Д​...
hcjdbghfgyfjfh hcjdbghfgyfjfh  16.08.2019 01:20
Переведите в десятичную систему числа: 7018 и 3а16. , . (отдельные числа)...
elizavetachery elizavetachery  04.08.2021 15:03
Я новичок в программировании,помните решить задачу: Вам необходимо написать функцию, которая возьмет несколько слов в качестве аргумента и вернет объединенную версию этих...
Ananzi Ananzi  04.08.2021 15:34
Возможно ли вычислить данный оператор присваивания при каких-либо типах переменных x и y? Если да, то укажите типы, если нет, то объясните, почему. y:=trunc(x)div y+ sin (Pi*y)+sqr(y*x)...
Il123456 Il123456  04.08.2021 15:34
Что выведут данные программы? a) var a,b,c:integer; begin a:=1 + 11 div 3; b:=2 + 18 mod 3; c:=2.1 + 14 mod 4; writeln(a, ,b, ,c) end. b) var a,b,c:integer; begin a:=trunc...
БИОЛОГИЯ1204 БИОЛОГИЯ1204  04.08.2021 15:40
Какое минимальное число необходимо подать на вход программе, чтобы было выведено число `3629`? var n:integer; begin readln(n); writeln(n div 100 mod 20*1000 + n div 20 mod...
DashaKuhal DashaKuhal  04.08.2021 15:42
Запишите по правилам Паскаля выражение:...
КаземираМалевична КаземираМалевична  15.04.2019 20:20
Товарищи, нужна по информатике! время поджимает, я пытаюсь разобраться с этим, но не успеваю.. выручите, правда! заранее . (я прикреплю фото условия и .)...
svetaЗОШ svetaЗОШ  15.04.2019 20:24
Найти ошибки вот : #include #include #include #include #include int main() { int chislo_slov; //число слов int dlia_vvoda_chisla_slov; for(dlia_vvoda_chisla_slov=0; dlia_vvoda_chisla_slov...

Популярные вопросы