1. Информатика
  2. Составить программу вести с

Составить программу вести с клавиатуры переменные х и у, поменять их значения местами, если x> y. на pascal

PolinaChery04 PolinaChery04    2   22.08.2019 10:30    1

Ответы
марья49 марья49  05.10.2020 12:18
Var x, y:Integer;
Begin
readln(x);
readln(y);
if x>y then
writeln(x,' ', y);
if x<y then
writeln(y,' ', x);
End. 
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
lglglglgl lglglglgl  26.01.2021 17:53
Составьте программы на Паскале для решения задач № 6-9 из заданий к § 10. При этом отмените ограничения на количество операций в арифметическом выражении, сформулированные...
Доминатр Доминатр  11.12.2020 14:00
Решите 3 вопроса! 1)Сколько существует натуральных чисел х, для которых выполнено неравенство 100111002 x C616 2)Максимальная скорость передачи данных по некоторому...
Kkb194 Kkb194  11.12.2020 14:00
решить информатику. ответ запишите с решением. Укажите в порядке возрастания все основания систем счисления, в которых число 15 имеет младшим разрядом единицу....
jvdvzkris jvdvzkris  11.12.2020 14:03
2. Сколько бит информации содержится в сообщении: «четверть килобайта»? * 3. Алфавит племени Мульти состоит из 32 букв. Какое количество информации несёт одна буква...
vitalya0011 vitalya0011  20.11.2020 15:32
Нарисовать блок схему для программы​...
asssssw asssssw  20.11.2020 15:31
1. Что такое данные? 2. Что такое программа? 3. Что является центральным устройством компьютера? 4. Какую функцию выполняют устройства ввода? 5. Какую функцию выполняют...
elinaaak elinaaak  20.11.2020 15:30
Поеутрлеу использовать Чертежник алг нач нц 4 раз опустить перо сместиться на вектор (1,0) сместиться на вектор (-1,-1) сместиться на вектор (1,0) поднять перо сместиться...
Dangerrr Dangerrr  04.09.2019 18:23
Составить блок схему к программе var n,i: integer; f: real; beginreadln(n); i: =0; f: =1; while i begin i: =i+1; f: =f*i; end; write(n, ! = ,f: 0: 0); readlnend.​...
LanaAnn LanaAnn  19.10.2020 06:46
Переведите из Python в Pascal: a = int(input()) b = int(input()) s = 0 for i in range(a, b + 1): if i % 2 == 0: s += i else: s -= i print(s)...
Dead94 Dead94  19.10.2020 06:46
7. Ввести послідовність з трьох чисел і підрахувати добуток тих із них, які кратні 3( зробити діаграмою)...

Популярные вопросы