составить программку вычисляющее величайшее из 3 заданных чисел(abc pascal)a=10b=20c=27

Составить программку вычисляющее величайшее из 3 заданных чисел(abc pascal)
a=10
b=20
c=27

Задать свой вопрос
1 ответ

var

 a, b, c: Integer;

begin

 a := 10;

 b := 20;

 c := 27;

 Write ('Величайшее число = ');

 if a gt; b then

   if a gt; c then

     Write (a)

   else

     Write (c)

 else

   if b gt; c then

     Write (b)

   else

     Write (c);

end.


Kolek Bit Lazar
Thx, реально от души
Данил Хижевский
А почему с вар начинается?
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт