Поменяйте порядок строк так, чтобы программа получилась прежней gipotenuza, которая вычисляет квадрат гипотенузы прямоугольного треугольника, основываясь на введенных с клавиатуры значениях двух катетов. 1. program gipotenuza; 2. write ("введите длины катетов: "); 3. read (a, b); 4. c := a*a + b*b; 5. write ("квадрат гипотенузы равен ", c); 6. end; 7. var; 8. begin;
Солнечный_Каллиграф
Конечно! Вот преобразованный код:
1. program gipotenuza;
2. var
3. a, b, c: real;
4. begin
5. write ("введите длины катетов: ");
6. read (a, b);
7. c := a*a + b*b;
8. write ("квадрат гипотенузы равен ", c);
9. end.
1. program gipotenuza;
2. var
3. a, b, c: real;
4. begin
5. write ("введите длины катетов: ");
6. read (a, b);
7. c := a*a + b*b;
8. write ("квадрат гипотенузы равен ", c);
9. end.
Знаешь ответ?