Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
dabby25
28.08.2022 14:55 •
Информатика
Составить программу обмена значениями трех переменных величин: a,b,c. на языке pascal
Показать ответ
Ответ:
Kamjla1
26.07.2020 21:46
Var
A,B,C,D:integer;
Begin
Write('a = ');Read(a);
Write('b = ');Read(b);
Write('c = ');Read(c);
d:=a;
a:=b;
b:=c;
c:=d;
WriteLn;
WriteLn('a = ',a);
WriteLn('b = ',b);
WriteLn('c = ',c);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
amiralimurodov
22.11.2021 04:28
Язык python 1. Напишите код программы, которая при вводе списка чисел определяет, какие из введенных чисел являются степенями числа 2, и выводит их на экран через пробел...
aleks201610
15.12.2022 13:39
Перечислите цифры систем счисления по основанию 2,3,4,5,8,9,12,13,16,18....
ум5789
02.05.2022 20:02
Кто знает javascript ? написать функцию которая подсчитывает факториал числа,заданого параметра а) вспомнить что факториал числа n равен 1*2**n,факториал 0 равен 1, факториала...
natali2613
12.01.2023 13:45
Нужно создать программу паскаль авс, где перед нами предстает выбор тестов. например: тест по русс.яз тест по тест по тест по тест по обществознанию можете просто пару вопросов...
Dion111
23.02.2021 01:18
Даны 2 числа больше некоторого введенного k получить квадрат из модулей, если числа отрицательные, то сложить их, в противном случае увеличить числа в 3 раза...
Milangross
02.11.2020 23:32
Вы приобрели котенка.каждый вечер во определяете его вес с весов.как можно описать на паскале массив,в котором будут храниться значения веса котенка в течение месяца(нпапиер,мая)?...
Validgon
08.11.2022 09:51
Составить программу которая заменяет все нечетные числа на 31 массив из 15 целых чисел формируется случайным образом в интервале [20; 30]...
ogxo
08.11.2022 09:51
Найти максимальный элемент массива x(10). написать программу в паскале ....
hitman19102003
11.08.2020 02:24
Вычислите: 101010102 – 2528 + 716. ответ запишите в десятичной системе счисления....
Alisa6666666666666
05.05.2022 22:40
Скорость передачи данных через adsl-соединение равна 213 бит/c. передача файла через данное соединение заняла 2 минуты. определите размер файла в кбайт. в ответе укажите...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
A,B,C,D:integer;
Begin
Write('a = ');Read(a);
Write('b = ');Read(b);
Write('c = ');Read(c);
d:=a;
a:=b;
b:=c;
c:=d;
WriteLn;
WriteLn('a = ',a);
WriteLn('b = ',b);
WriteLn('c = ',c);
End.