Предмет: Информатика,
автор: 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.
Твоя программа получает на вход два числа. Затем она их сравнивает и, если х > у, меняет их значения местами через дополнительную переменную а. Затем выводятся х и у на экран.
Похожие вопросы
Предмет: Математика,
автор: llebed678
Предмет: Русский язык,
автор: animetenka
Предмет: Русский язык,
автор: 030409daniil
Предмет: Алгебра,
автор: BlackFenix1313
Предмет: Литература,
автор: Gleb1Kosyrev