Расположите строки так, чтобы получилась программа, вычисляющая по двум введенным с клавиатуры катетам их квадрат гипотенузы прямоугольного треугольника. program gip; var a, b, c: real; begin write('Введите длины катетов: '); read(a, b); c := a*a + b*b; write('Квадрат гипотенузы равен ', с); end.
Задание

Расположите строки так, чтобы получилась программа, вычисляющая по двум введенным с клавиатуры катетам их квадрат гипотенузы прямоугольного треугольника.

  • program gip;
  • var a, b, c: real;
  • begin
  • write\('Введите длины катетов: '\);
  • read\(a, b\);
  • c := a*a + b*b;
  • write\('Квадрат гипотенузы равен ', с\);
  • end.