Задать вопрос
25 июля, 07:23

Даны М, N, К.

Определить, какие две переменные равны. Если равных переменных нет, вывести соответствующее сообщение

+3
Ответы (1)
  1. 25 июля, 08:14
    0
    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
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Даны М, N, К. Определить, какие две переменные равны. Если равных переменных нет, вывести соответствующее сообщение ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы