Несложно ! 1. даны два случайных числа. определить а) наибольшее б) наименьшее 2. даны три числа. вывести а) наибольшее б) наименьшее паскаль

макс3106 макс3106    3   12.09.2019 03:10    0

Ответы
katakoval katakoval  10.08.2020 18:29
Var a,b,c,d:integer;
begin
read (a,b);
if a>b then begin c:=a; d:=b;end
else c:=b; d:=a;end;
writeln(c,d);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика