1 - регистр
2 - кэш
3 - SSD
4 - HDD
5 - Ethernet
6 - WiFi
Высказывание соответствует для имени Елена (первая буква е-гласная, четвертая буква н-согласная)
В данном случае источником информации можно рассмотреть как Себя так и телефон. Если Я источник информации, то кодирующим устройством будет телефон, каналом связи - электромагнитные волны, декодером - телефон друга, приемником - друг.
Var N:integer;
r1,r2,r3:byte;
Begin
WriteLn('Введите четырёхзначное число');
ReadLn(N);
r1:=N div 1000;
r2:=(N div 100) mod 10;
r3:=(N div 10) mod 10;
N:=N mod 10;
Write((r1<>r2)and(r1<>r3)and(r1<>N)and(r2<>r3)and(r2<>N)and(r3<>N))
End.