Есть ответ 👍

Принадлежит ли точка графику функции y=kx

165
302
Посмотреть ответы 1

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


var m,x,n,p,i: integer; s: boolean; beginp: =1; writeln('vvedite kolichestvo chisel: '); read(n); writeln('vvedite chislo s kotorim sravnit: '); read(m); writeln('vvedite cifri: '); for i: =1 to n do beginreadln(x); if m< x then begin p: =p*x; s: =true; end; end; if s=true then writeln('proizvedenie - ',p) else writeln('net takih chisel'); end.

Популярно: Информатика