Составить программу, рассчитывающую гипотенузу прямоугольного треугольника по катетам введённым с клавиатуры.
Program gipot; Uses Crt; Var a,b,c:real; begin clrscr; Writeln ('a,b ='); Read (a,b); c:=sqrt(sqr(a)+sqr(b)); Writeln ('c=',c); readkey; end.
Мы еще не проходили readkey. Меня сразу спалят з: Как написать для 9-классника такое?
Спасибо! :)