Нужно создать список учеников старших классов, выбрать юношей, годных для занятий в баскетбольной секции. В графе 'заключение' должно появляться годен (красным цветом) /не годен (синим цветом). Рост должен быть не менее 1.7м, а группа здоровья - основная. Какие формулы надо использовать

а) является носителем информации.

б) круглый.

var a,b: string; begin                            cls;   read(a);     b: =a;           write('b')end.           

на pascal:

program sonik;

uses crt;

var a,b,c: string;

begin

readln (a);   readln (b);   readln (c);

writeln (' фигуры: ',a,b,c);

end.

смотря какая передача и каких данных, много чего придумать можно, мне кажется) телефон, радио, модем,рация. или просто- передатчик.