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

1. Program Gipotenuza;
2. C: =A*A+B*B;
3. Write ('Квадрат гипотенузы равен ',c)
4 End.
5 Read (A, B)
6 write ('Введите длины катетов: ');
7 var
8 begin

Program Gipotenuza;var A,B,C: real;beginwrite ('Введите длины катетов: ');Read (A, B);C: =A*A+B*B;Write ('Квадрат гипотенузы равен ',c);end.

1. Program Gipotenuza;

7. var а, b, c: integer;

8. begin

6. write ('Введите длины катетов: ');

5. Read (A, B);

2. C: =A*A+B*B;

3. Write ('Квадрат гипотенузы равен ',c);

4. End.