Задание 5 Урок 9
Primary tabs
Задание 5 Урок 9
Пользователь вводит два числа, найдите из них максимальное. (тут всё просто)
var a,b,max : real; begin write('Введите два числа через пробел и нажмите ENTER: '); readln(a,b); if (a > b) then begin max := a; write(max:0:1); end else begin max := b; write(max:0:1); end; readln(); end.
Исправленный вариант (16.09.2020)
var a,b,max : real; begin write('Введите два числа через пробел и нажмите ENTER: '); readln(a,b); if (a > b) then begin max := a; write(max:0:1); end else begin max := b; write(max:0:1); end; readln(); end.
- Log in to post comments
- 849 reads