Вычислить произведение целых чисел введенных с клавиатуры . произведение подсчитывается до тех пор , пока вводятся числа в интервале от -10 до +10 через
sdtyvbv
2
01.06.2019 12:30
0
Другие вопросы по теме Информатика
Shagovikova08
12.12.2021 23:12
etfchyrbkh
12.12.2021 23:14
Людочка13
12.12.2021 23:19
Smetanka82
12.05.2020 14:33
камран12
12.05.2020 14:34
Лино444ка
22.08.2019 04:40
maximminkov315
26.10.2020 08:23
Jacob888
22.10.2020 19:55
fsdfsdfdsfsdfsdf
22.10.2020 19:55
Популярные вопросы
- А) начерти отрезок длиной 10 см. начерти отрезок, длина которого равна 2,5...
3 - Найдите объем куба,если площадь его развертки равна 96 см2(квадратных)...
3 - Как пишется(на гантеле или на гантели)...
1 - Узнай число,которое на 85 больше,чем 19600...
2 - Составьте алгоритм действий покупателя при выборе какого либо товара....
1 - Выбири слова не имеюшие множественное число желание зной детвора время свежесть...
3 - Синонимдік қатарды көрсетіңіз а)тән,жаң,озат б)ерлік,батырлық,пәс с), төзім,тағат...
1 - Составить 4 вопроса: 2 отрицательных и положительных с must, 2 отрицательных...
3 - Твир на тему* моя улюблена пора року*...
1 - Сколько существует чисел кратных 8 и не превосходящих 300...
3
begin
p := 1;
read(a);
repeat
P:= p*a;
read(a)
until (a < -10) or (a > 10);
Write(p);
end.