Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
RitkaRita
25.05.2022 05:17 •
Информатика
Даны две переменные целого типа: a и b. если их значения не равны, то присвоить каждой переменной сумму этих значений, а если равны, то присвоить переменным нулевые значения. вывести новые значения переменных a и b.
Показать ответ
Ответ:
smail520
15.07.2020 12:46
Var a,b,c:integer;
begin
readln(a,b);
if a<>b then
begin
c:=a+b;
a:=c;
b:=c;
end
else begin
a:=0;
b:=0;
end;
writeln('a=',a,' b=',b);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Yxcvbnm3
03.05.2021 23:03
Графическая разновидность шрифта в пределах одной гарнитуры, различаемая по плотности (ширине) (нормальное, узкое, широкое), по постановке (наклону) (прямое, курсивное, наклонное),...
AndrewDremin
18.08.2020 13:05
Вычислите сумму натуральных чисел от 1 до 10, используя различные виды циклов. Буду очень благодарен....
ibrashovo
03.06.2020 22:08
Объем оперативной памяти определяет...
ArseniyRich
03.06.2020 22:08
Примером процесса хранения информации может служить процесс?...
Fadasa
03.06.2020 22:08
Из предложенного списка выберите информационные модели объектов, процессов или явлений 1) чертеж болта 2)закон всемирного тяготения 3) график функции 4)расписание занятий 5)скелет...
22050
03.06.2020 22:08
Из перечисленного списка выберете название поисковых систем интернета a. l m p r e s s b. проводник c. g o o g l e d. a l t a v i s t a e. o u t l o o k e x p r e s s f. y a n d...
професорАртём
12.10.2021 13:59
Даны три стороны треугольника .определить существует ли треугольник с заданными сторонами.нужна блок...
Дерюгин
16.10.2021 05:21
Укажите наибольшее шестизначное восьмеричное число, двоичная запись которого содержит ровно 8 нулей...
Lerka2004love
16.10.2021 05:21
Шарик массой 2 грамма подвешен на шелковой нити длиной 50 см. шарик имеет положительный заряд 10 нкл и находится в однородном электрическом поле, напряженность которого направлена...
mmmkkk3
16.10.2021 05:21
Напишите сочинение на тему «темная сторона популярности» желательно абзаца 3-4...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(a,b);
if a<>b then
begin
c:=a+b;
a:=c;
b:=c;
end
else begin
a:=0;
b:=0;
end;
writeln('a=',a,' b=',b);
end.