2)
var
catet1, catet2, c: real;
begin
write('первый катет = ');
readln(catet1);
write('второй катет = ');
readln(catet2);
c := sqrt(catet1*catet1 + catet2*catet2);
writeln('гипотенуза: ',c:1:2)
end.
Объяснение:
Первая задачка условие не понятно, напиши в коментах что найти нужно, что за переменная
catet1, catet2, c:real;
writeln('первый катет= ');
readin(catet1)
writeln (второй катет=')
redin(katet2)
c:=sqrt(katet1×catet1+catet2×catet2)
end
Первая задача условие не понятно.
2)
var
catet1, catet2, c: real;
begin
write('первый катет = ');
readln(catet1);
write('второй катет = ');
readln(catet2);
c := sqrt(catet1*catet1 + catet2*catet2);
writeln('гипотенуза: ',c:1:2)
end.
Объяснение:
Первая задачка условие не понятно, напиши в коментах что найти нужно, что за переменная
2)
var
catet1, catet2, c:real;
begin
writeln('первый катет= ');
readin(catet1)
writeln (второй катет=')
redin(katet2)
c:=sqrt(katet1×catet1+catet2×catet2)
writeln('гипотенуза: ',c:1:2)
end
Объяснение:
Первая задача условие не понятно.