Составить программу на Паскале, которая выводит на экран наибольшее число из

Составить программку на Паскале, которая выводит на экран максимальное число из трёх вводимых. Безотлагательно!

Задать свой вопрос
2 ответа
Var a,b,c,max:integer;beginreadln(a,b,c);if agt;b thenmax:=a elsemax:=b ;if maxgt;c thenmax:=max elsemax:=c;writeln('Наибольшее число:', max);end.
Екатерина Майлян
Var a,b,c,max:integer;beginreadln(a,b,c);if a>b thenmax:=a elsemax:=b ;if max>c thenmax:=max elsemax:=c;writeln('Наибольшее число:', max);end.
Var a, b, c: integer
function max(a,b: integer): integer;
begin
if agt;b then max:=a
else max:=b
end

begin
readln (a,b,c);
writeln(max(max(a,b),c));
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт