Выямнено что программисты тратят рабочее время на:постановку задач -5%,на проектирование -10%,на кодирования -30%,на внедрение-40%,на сопровождение-15%.Составить статистику своих личных затрат и сравнить с указанными данными.Указание:возьмите достаточно средние оценки затрат по некоторым составленным вами программ.

Из того,что Смит самый высокий следует,что он играет НЕ на скрипке.Так же понимаем,что Смит играет не на альте и не на трубе.Значит,он играет на флейте и гобое

Браун не играет на трубе,это понятно.Но тогда он играет на альте,так как ссорится с трубачом.Значит,на трубе играет Вессон.

Из предложения,что игращие на скрипке и флейте и Браун любят пиццу получаем,что Браун играет не на скрипке.Значит,Браун играет на альте и кларнете.А Вессон - на скрипке и на трубе.

ответ:Смит играет на флейте и гобое,Браун играет на альте и кларнете,Вессон - на скрипке и трубе

1 задача

program proga;

var st,st2:string;

i:Integer;

begin

writeln('Введите число');

readln(st);

for i:=1 to length(st) do begin

st2:=st[i];

write(st2,' ');

end;

end.

2 задача

program proga2;

var st,st2:string;

i,a:Integer;

begin

writeln('Введите возраст');

readln(a);

if a>120 then

writeln('Неверные данные');

if a=1 then

writeln(a,' год');

if (a>1) and (a<5) then

writeln(a,' года');

if((a mod 10 = 1) and (a div 10 <> 0 or 11 )) then writeln(a,' год');

if (a>=5) and (a mod 10 <> 2 or 3 or 4)and (a div 10 <> 10) then

writeln(a,' лет');

if (a<=5) and (a mod 10 = 2 or 3 or 4)and (a div 10 = 10) then writeln(a,' года ');

if(a>104) and (a<110)then writeln(a,' лет');

end.