Ответ:
var
r1, r2, r3: real;
begin
readln(r1, r2, r3);
if (r1>=r2) and (r1>=r3) then
writeln(r1)
else if (r2>=r1) and (r2>=r3) then
writeln(r2)
else
writeln(r3);
end.
Объяснение:
17..................................
а) 2 и 10 ................................................................
Под определение "организация" здесь подходит только 2 и 4. Но 2 занимается веб-дизайном, тогда ответ - 4.
Из какой системы переводить?