Ввести натуральное число и определить, какие цифры встречаются несколько раз. с repeat until

Var a : integer;     s : set of byte; begin   s: =[];   readln(a);   repeat     if (a mod 10) in s then write(a mod 10: 2) else include(s,a mod 10);     a: =a div 10;   until a=0;     writeln; end.

ввод/вывод означает взаимодействие между обрабочиком информации (например, компьютер) и внешним миром, который может представлять как человек, так и любая другая система обработки информации. ввод — сигнал или данные, полученные системой, а вывод — сигнал или данные, посланные ею (или из нее).

устройства ввода и вывода можно условно разделить на устройства, с которых информация передается машине от человека, человеку от машины и от одной машины другой машине. наиболее распространенные устройства следующие: – устройства ввода: клавиатура, сканер, устройства местоуказания (мышь, джойстик, графический планшет, световое перо); – устройства вывода: дисплей, принтер, плоттер, звуковая карта; – устройства, обеспечивающие связь с другими машинами: модем, сетевой адаптер, инфракрасный порт и т.д.

 

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

1)

германия берлин

греция афины

испания мадрид

польша варшава

франция париж

 

2)

греция афины

германия берлин

польша варшава

испания мадрид

франция париж