Паскаль! начальный уровень! ! с циклом while - вопрос №6317064 от tomahvisucik16 18.05.2021 18:13

Question

Информатика: Паскаль! начальный уровень! ! с циклом while (без массива! без repeat! и т.д). максимально просто и понятно. произведение n первых нечетных чисел равно p. определить, сколько сомножителей взято.

tomahvisucik16 · Answer

varn : integer;p : integer;x : integer;c : integer;begin c := 0; readln(n,p); readln(x); while (x 0) do begin if (x mod 2 0) then c += 1; readln(x); end; writeln(c);end.??? Непонятное условие....