Склавиатуры вводится последовательность чисел до тех пор пока не будет введено число 0. требуется найти произведение чисел из введенной последовательности кратных пяти
Алисика11
1
08.06.2019 16:40
2 
Популярные вопросы
- Даны 2 числа а и в.найти наибольшее и наименьшее из них и вывести на...
2 - Определить валентность элементов в следующих соединениях, зная, что...
3 - Какая река в европе служила естественной границей в десятом веке между...
3 - Составьте 7 предложений с подлежащим выраженным одним словам...
2 - Составить 10 словосочетаний с корнями,в которых чередуются гласные...
2 - Вычислить дробь 7/15 + 1/2 и 4/7+3/10...
3 - 6. поставьте вопросы к выделенным словам: 1. (he) ordered (meat) for...
1 - Ты являешься сообственником земельного участка, пашни огорода, все...
2 - Образцовое изделие, которое должен был выполнить подмастерье для сдачи...
1 - Укажите хронологически рамки периода бронзы...
1
x, s: integer;
begin
s := 1;
repeat
readln(x);
s *= (x = 0 ? 1 : x);
until (x = 0);
writeln(s);
end.