Проверьте, есть ли среди трех заданных чисел равные. программку в паскале напишите )

Psix73 Psix73    3   17.03.2019 05:10    0

Ответы
Mamonga Mamonga  07.06.2020 02:40

var a,b,c:integer;

begin

readln(a,b,c);

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

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика