Найти площадь треугольника ah, ввести нужно в турбо паскале (информатика 9 класс)

Question

Информатика

Эма

8 декабря, 22:53

Найти площадь треугольника ah, ввести нужно в турбо паскале (информатика 9 класс)

+3

Ответы (1)

Знаете ответ на вопрос?

Генюха · Answer 1

Program myprogram2;

var

a, h, s:real;

begin

writeln ('Введите длину основания a') ;

write ('a = ') ;

readln (a) ;

writeln ('Введите длину высоты h') ;

write ('h = ') ;

readln (h) ;

s:=0,5*a*h;

write (Площадь треугольника с основанием ', a',' и высотой ', h,' равна = ', s) ;

readln;

readln;

end.