Предмет: Информатика,
автор: Ilham2017
Срочно, помогите по информатике!
От этого зависит итоговая оценка!
Приложения:
Ответы
Автор ответа:
0
В след. раз пиши язык программирования это Pascal
PROGRAM AYA;varn,m,k:integer;BEGIN writeln('BBecTu n,m,k'); read(n,m,k); if (n>m) and (n>k) then begin writeln('n caMbiII 6oJlbIIIoII'); end; if (m>n) and (m>k) then begin writeln('m caMbiII 6oJlbIIIoII'); end; if (k>m) and (k>n) then begin writeln('k caMbiII 6oJlbIIIoII'); end; if (n=m) and (n=k) then begin writeln('oHu paBHbI Bce'); end;END.
PROGRAM AYA;varn,m,k:integer;BEGIN writeln('BBecTu n,m,k'); read(n,m,k); if (n>m) and (n>k) then begin writeln('n caMbiII 6oJlbIIIoII'); end; if (m>n) and (m>k) then begin writeln('m caMbiII 6oJlbIIIoII'); end; if (k>m) and (k>n) then begin writeln('k caMbiII 6oJlbIIIoII'); end; if (n=m) and (n=k) then begin writeln('oHu paBHbI Bce'); end;END.
Приложения:
Автор ответа:
0
Я уже сам решил) всё равно большое спасибо
Похожие вопросы
Предмет: Обществознание,
автор: hnr10ad
Предмет: Биология,
автор: yomayokakdela
Предмет: Информатика,
автор: uischenbekowgmailcom
Предмет: Физика,
автор: mrsafa
Предмет: Биология,
автор: Olegys123456789009