Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
JuliusM
13.08.2021 23:01 •
Информатика
Даны м, n, к. определить, какие две переменные равны. если равных пе¬ременных нет, вывести соответствующее сообщение
Показать ответ
Ответ:
заразарема
20.08.2020 22:47
Var m,n,k:integer;
begin
readln(m,n,k);
if m=n then writeln('m = n')
else if m=k then writeln('m = k')
else if n=k then writeln('n = k')
else writeln('Равных значений нет');
end.
Пример:
8 5 8
m = k
0,0
(0 оценок)
Популярные вопросы: Информатика
20Lorans03
28.08.2021 11:06
Компьютер, который обращается к серверу за содержимым веб-сайта, называется......
sofitit0410
29.01.2023 07:42
Практикалык жумыс информатика ...
tanyushchik
14.10.2022 01:13
=====================================...
Зайчуля2004
21.05.2021 01:40
ТЕКСТ ЗАДАНИЯ Установите соответствие между переменной и типом данных Количество связей: 4 А= Программирова integer (целочисленный) ние u В=346 boolean (логический)...
GrigoriyPokoti
23.11.2021 02:40
Изучите блок-схему и напишите псевдокод задачи дам макс. ...
katya050600
22.09.2022 02:58
1. Прочитайте текст. 2. Определите основную мысль текста и запишите ее.3. Тип текста4. На основе прослушанного текста составьте диалог-расспрос, ме«Говорящий» на «слушающий».-руководителя...
Ulugbek9i
22.09.2022 02:58
Мәтіннің мазмұнына сүйеніп, кейіпкерді сипаттайтын бірнеше тірек сөз жаз. Сол сөздерді қолданып, кейіпкерге жазбаша мінездеме бер. ...
smichuksvitlana
22.09.2022 02:58
Диалог двух космонавтов...
sohibjon457
28.12.2021 03:34
Виберіть одну правильну відповідь. Поетичну збірку «Листя трави» Волт Вітмен писав А кілька років; Б рік; В усе життя; Г кілька місяців. 2. Виберіть одну правильну відповідь....
Krest007
17.03.2022 10:51
жұптық жұмыс.Мәтіннен тірек сөздерді теріп алыңдар.Сол сөздерге суйеніп Өмір баспалдағы тақырыбына баяндамалық сипаттағы мәтін жазу...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(m,n,k);
if m=n then writeln('m = n')
else if m=k then writeln('m = k')
else if n=k then writeln('n = k')
else writeln('Равных значений нет');
end.
Пример:
8 5 8
m = k