Предмет: Информатика,
автор: azlagor1820
Пожалуйста решите и объясните откуда что взялось
Приложения:
victorofficial:
Какой язык?
Ответы
Автор ответа:
1
Pascal
Program change;
Var x, y, a: integer;
Begin
Readln(x, y);
If x > y then
Begin
a := x;
x := y;
y:= a;
End;
Writeln(x, y);
End.
Твоя программа получает на вход два числа. Затем она их сравнивает и, если х > у, меняет их значения местами через дополнительную переменную а. Затем выводятся х и у на экран.
Program change;
Var x, y, a: integer;
Begin
Readln(x, y);
If x > y then
Begin
a := x;
x := y;
y:= a;
End;
Writeln(x, y);
End.
Твоя программа получает на вход два числа. Затем она их сравнивает и, если х > у, меняет их значения местами через дополнительную переменную а. Затем выводятся х и у на экран.
спасибо большое
Пожалуйста
Похожие вопросы
Предмет: Математика,
автор: Аноним
Предмет: Геометрия,
автор: yurlova19
Предмет: Математика,
автор: karoliukas042
Предмет: Алгебра,
автор: BlackFenix1313
Предмет: Литература,
автор: Gleb1Kosyrev