Предмет: Информатика,
автор: vnika14
найти наибольшее из трёх чисел и уменьшить его на 5( в Паскаль)
Ответы
Автор ответа:
0
var a,b,c,max:real;
begin
readln(a,b,c);
max:=a;
if max<b then max:=b;
if max<c then max:=c;
max:=max-5;
write(max);
end.
Интересные вопросы
Предмет: Окружающий мир,
автор: manapuskarenko
Предмет: Химия,
автор: vikibarl483
Предмет: Русский язык,
автор: chauninasofiya2011
Предмет: Алгебра,
автор: Natysik321
Предмет: Геометрия,
автор: Zlatka1337