Соотнесите, какому заданию соответствует алгоритм

иван-занимается легкой атлетикой,петр-баскетболом, алексей-хоккеем, андрей-футболом

program xxx;

var a: string;

begin

    write('введите строку-');

    read(a);

    write(a);

  readln

end.

var a,b,c,s,p: real;

begin

  read(a,b,c);

  p: =(a+b+c)/2;

  s: =sqrt(p*(p-a)*(p-b)*(p-c));

  write(s: 0: 2);

end.

вроде так

см файл

за январь нет оплаты так как нет предыдущих показаний

excel таблицы не прикрепляются