На ввод числа через пробел в порядке невозрастания. если числа одинаковы, то записать их в одну строку. если нет, то записать на следующей. последовательность чисел заканчивается нулем.

дильназСпецназ дильназСпецназ    1   07.08.2019 18:30    1

Ответы
Лиза45111 Лиза45111  04.10.2020 03:27
Var  a1,b2,c3:integer;beginreadln(a1,b2,c3);if (a1=b2)and(b2=c3)then writeln(a1+' '+b2+' '+c3)else begin write(a1); writeln(); write(b2);writeln(); write(c3); end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика