Предмет: Информатика,
автор: Gmgk
11 класс, проходим основы программирования на языке Паскаль. Учитель задал эту задачу, не представляю как сделать по ней нужную программу, помогите пожалуйста.
ДАНЫ 2 КАТЕТА, ЗНАЧЕНИЕ КОТОРЫХ ВВОДИТСЯ С КЛАВИАТУРЫ. НАЙТИ ГИПОТЕНУЗУ И ПЛОЩАДЬ ПРЯМОУГОЛЬНОГО ТРЕУГОЛЬНИКА
Ответы
Автор ответа:
1
program prog;
uses crt;
var
a,b,c,s:real;
begin
write('катет a = ');
readln(a);
write('катет b = ');
readln(b);
writeln;
c:=sqrt(sqr(a)+sqr(b));
s:= (a*b)/2;
writeln('Гипотенуза с = ', c:0:3);
writeln('S = ', s:0:3);
end.
uses crt;
var
a,b,c,s:real;
begin
write('катет a = ');
readln(a);
write('катет b = ');
readln(b);
writeln;
c:=sqrt(sqr(a)+sqr(b));
s:= (a*b)/2;
writeln('Гипотенуза с = ', c:0:3);
writeln('S = ', s:0:3);
end.
Похожие вопросы
Предмет: Русский язык,
автор: Анна5349
Предмет: Русский язык,
автор: дашка610
Предмет: Английский язык,
автор: 2dasha
Предмет: Биология,
автор: qazwsx50
Предмет: Информатика,
автор: davidmir9