< >

-Проверьте, есть ли среди трех заданных чисел равные.

Программку в Паскале напишите )

Ответы

Ответ дал: nelle987
0

var a,b,c:integer;

begin

readln(a,b,c);

if((a=b)or(b=c)or(c=a)) then writeln(':)') else writeln(':(')

end.

Похожие вопросы
Английский язык
2 года назад
Oтветьте на вопросы: 1. Have you got a computer?  2. Do you play computer games? Why/ why not? 3. What other things do you do in your free time? 4. How much time do you spend on your free time? 5.
Українська мова
2 года назад
звуково-буквений аналіз слова якусь
Математика
7 лет назад
В первый день турист шёл 6 часов, во второй день он прошел 30 км,в третий день на 20 км больше,чем во второй, а в четвёртый день турист шёл 5 часов со скоростью 8км/ч. Всего он преодолел 180 км.с
Физика
7 лет назад
Мяч брошенный из окна здания в горизонтальном направлении со скоростью 12 м с упал на землю через 2 секунды Определите высоту с которого был брошен мяч какое расстояние Он пролетел по горизонтали
Алгебра
10 лет назад
придумайте задачу и укажите ее решение ответ на любую тему прошу
Математика
10 лет назад
1.С одного участка собрали 51 корзину винограда,а со второго 60 таких же корзин. Со второго участка собрали на 216 кг больше,чем с первого. Сколько килограммов винограда в одной корзине?   2.Периметр
Химия
10 лет назад
составьте план выделения сахара из смеси его с песком и водой.Укажите,какие свойства веществ,составляющих смесь,при этом учитываются
Геометрия
10 лет назад
Теорема о сумме углов выпуклого n-угольника(доказательство)