Вопрос по информатике:
Даны М, N, К.
Определить, какие две переменные равны. Если равных пе¬ременных нет, вывести соответствующее сообщение
Пожаловаться
- 08.04.2016 03:57
- Информатика
- remove_red_eye 16857
- thumb_up 5
Ответы и объяснения 1
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
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
Пожаловаться
- 09.04.2016 10:27
- thumb_up 43
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы