Даны два числа, отличных друг от друга. Найти большее число. Вводные данные: а и b- два...

Question

Даны два числа, отличных друг от друга. Найти большее число. Вводные данные: а и b- два числа, где а<>b. Выходные данные:значение большего числа.

Answer 1

program dvachisla;

var a,b:integer;

begin

write('vvedite chislo a');

read (a);

write ('vvedite chislo b');

read (b);

if a>b then write ('a bolshe b')  

else write ('b bolshe a');

end.

Answer 2

Var a,b integer;
Begin
Writeln(‘Введите числа а и b’);
Readln(a,b);
If a > b then
Writeln(a, ‘ больше чем ‘, b)
Else
Writeln(b, ‘ больше чем ‘, a)
End.

Comments

Или вместо Writeln(a, ‘больше чем ‘, b); и для б соответственно можно просто написать writeln(a) и writeln(b)

---

поможешь лучше другое?

---

Го

---

Ток я вопроса не понял

---

давай потом:3 в другой раз:3

---

уже урок окончен :3

---

))