с клавиатуры вводится последовательность чисел до тех пор пока не будет введено ...

pirov1996 @pirov1996

October 2021 1 3 Report

с клавиатуры вводится последовательность чисел до тех пор пока не будет введено число 0. требуется найти произведение чисел из введенной последовательности кратных пяти

Answers & Comments

HRAshton var
x, s: integer;

begin
s := 1;
repeat
readln(x);
s *= (x = 0 ? 1 : x);
until (x = 0);
writeln(s);
end.

1 votes Thanks 0

dan massiv a sostoyashij iz 15 celyh chisel trebuetsya najti srednee arifmetichesk

Answer

Answers & Comments

s klaviatury vvodyatsya dva chisla trebuetsya najti kub maksimalnogo iz nih

s klaviatury vvodyatsya dva chisla vychislit udvoennyj kub ih summy

fxsinx 2 xlt 2p x3x2 x 2pp 3 x xgtp

dan massiv a sostoyashij iz 15 celyh chisel trebuetsya najti srednee arifmetichesk

рекомендуемые вопросы

Helpful Links

Helpful Social