написать программу : из 3-х данных чисел ( a , d

Написать программку : из 3-х данных чисел ( a , d и с) найьи наибольшее и умньшить его на 5

Задать свой вопрос
1 ответ
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)-5);
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт