Регистрация
garua
Есть ответ 👍

Напишіть твір-досдідження "крилаті вислови в п'єсі І.котляревського "Наталка Полтавка

274
377
Посмотреть ответы 1

Ответы на вопрос:

МарияПремудрая1
МарияПремудрая1
4,4(86 оценок)
Var  i,k,p,x: integer; begin writeln('введите количество чисел'); readln(k); p: =1; for i: =1 to k do begin   writeln('введите число');   readln(x);   if (x mod 2)< > 0 then p: =p*x;   end;   writeln('произведение нечётных членов =',p); end.

Популярно: Українська література