Предмет: Информатика, автор: katemiller98

написать программу по задаче
если два целых числа а и b равны

Ответы

Автор ответа: m0nclous
0
Var a,b:integer;
Begin
  Write('Введите 2числа'); readln(a,b);
if a<b then writeln(a, ' меньше ', b);
if a>b then writeln(a, ' больше ' ,b);
if a=b then writeln('числа ',a,' и ', b, 'равны');
end.
Похожие вопросы
Предмет: Литература, автор: dovbnialiuba12