tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Даны целые числа m и n.если
Даны целые числа m и n.если числа не равны,то заменить каждое из них одним и тем же числом 5, а если равны,то заменить числа нулями.
bryadovasg
3 22.07.2019 18:36
0
Ответы
irushkanet
23.09.2020 17:59
Var m,n:integer;
begin
readln(a,b);
if a<>b then begin a:=5; b:=5; end
else begin a:=0; b:=0; end;
writeln(a:3,b:3);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
MaksimVip12
25.03.2020 14:07
В одной из кодировок каждый символ кодируется 16 битами. Степан написал текст (в нем нет лишних пробелов, символы переноса слов не учитываются): Минеральные, климатические,...
Samal0
25.03.2020 14:12
Петя написал программу: var n: longint; begin read(n); writeln(n div 100 + n div 10 mod 10 + n mod 10); end. Определите, что будет напечатано при разных значениях...
irinamazda
13.04.2020 10:23
Саша, Катя, Егор, Арина и Коля выполняют самостоятельное задание на скорость. Коле не удалось выполнить задание первым. Сашу опередили двое его одноклассников....
дарий833
22.04.2021 10:23
Сделать до 11:30 как можно быстрее...
raku13
22.04.2021 10:21
Язык программирования паскаль, 3 задания, код можно не писать, просто объясните, как делать. за полезный ответ....
polly009090
22.04.2021 10:21
Задача 1.* Родина із трьох чоловік — батьки та дитина 12 років — планує подорожувати до різних міст України. Потрібно визначити, подорож яким транспортом буде дешевшою...
mariach1
14.08.2019 01:10
Найдите значение аргумента,при котором значение функции y=187-218x равно -467...
аннушка2935
14.08.2019 01:10
2.ask and answer the questions: 1). the cat / play? (eat) - is the cat playing? no, it isn’t. it is eating. 2). the boy / read (watch tv) - 3). they / dance? (speak)...
Fgrtpo
14.08.2019 01:10
1.укажите предложени с обращением. а)друзья к чему весь этот шум? в)давайте друзья поздравим нашего друга. д)у нашего друга день рождения....
57494967468746
14.08.2019 01:10
Сочините диалог традиционного средневекового мыслителя и гуманиста о том что такое человек и в чем цель его жизни. 6 класс....
Популярные вопросы
1)У кожній із двох партій є 100 деталей у першій партії є 5...
3
Составьте уравнения реакций, соответствующие превращениям: а)...
1
Как определяется имя ячейки электронной таблицы по умолчанию?...
2
Запиши спонукальні речення. Підкреслислова — назви дій двома...
3
В каком городе происходят действия Гобсек?...
3
Решить неравенство. Сопоставьте свои ответы с интервалами ниже....
3
Стихотворение Н. Сингаевского «Батьківське поле». Выполнить...
3
хоть кто нибудь. Очень нужно :1.Утиски православної церкви у...
3
До ть вирішити тест 1. Длянка молекули ДНК, на якій закодована...
2
Подумай и ответь на во Попробуй дать объяснение своему ответу....
1
begin
readln(a,b);
if a<>b then begin a:=5; b:=5; end
else begin a:=0; b:=0; end;
writeln(a:3,b:3);
end.