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

да

Строчки - это тоже переменные

но работать с ними необходимо по иному

Да. Какая версия Паскаля?

спасибо, я теснее разобралась как нужно решить эту задачку

program p1;var kat1,kat2,gip,s:real; cod,i,z:integer; st,st1,st2:string;begin readln(st); for i:=1 to length(st) do if st[i]=' ' then z:=i; st1:=copy(st,1,z-1); st2:=copy(st,z+1,length(st)-z); val(st1,kat1,cod); val(st2,kat2,cod); writeln(kat1,' ',kat2); gip:=sqrt(sqr(kat1)+sqr(kat2)); s:=kat1*kat2/2; writeln(gip,' ',s);end.

вот если занимательно

Нет, спасибо, совершенно не занимательно)))

Поэтому что там много лишнего

ну как тогда необходимо верно сделать

// PascalABC.Net 3.0, сборка 1052
var
  s1, s2: string;
  a, b: real;
  err: integer;

begin
  Writeln('Введи 1-ый катет: ');Readln(s1);
  Val(s1, a, err);
  if err lt;gt; 0 then Writeln('Ошибка при попытке получить числовое значение')
  else begin
    Writeln('Введи 2-ой катет: ');Readln(s2);
    Val(s2, b, err);
    if err lt;gt; 0 then Writeln('Ошибка при попытке получить числовое значение')
    else begin
      Writeln('Гипотенуза одинакова ', sqrt(a * a + b * b));
      Writeln('Площадь одинакова ', 0.5 * a * b)
    end
  end
end.