составить программу которая вводит с клавиатуры длину стороны ...
составить программу которая вводит с клавиатуры длину стороны квадрата вещественного типа и выводит на экран дисплея площадь квадрата.
процедура P1 вводит с клавиатуры длину стороны квадрата;
функция F1 вычисляет площадь квадрата;
Процедура P2 выводит на экран результат.
процедура P1 и функции F1 - встроенный в программу
процедура P2 - записывается как отдельный модуль подключаемый к основной программе.
в паскале
Есть ответ
18.12.2022
481
Ответ
программа на Turbo pascal 7.1:
содержание progs.pas:
{$N+}{-директива для подключения 8087 препоцессора}uses output1; {здесь подключаем модуль output1}
var p:double;
function F1(p:double):double;beginF1:=Sqr(p);end;
procedure P1(var p:double);beginreadln(p);p:=F1(p);end;
beginwrite('Введите длину стороны квадрата = ');P1(p);P2(p);end.
содержание output1.tpu:
{$N+}{-директива для подключения 8087 препоцессора}unit output1;{здесь объявляем модуль output1}
interface
procedure P2(p:double);
implementation
procedure P2;beginwriteln('Площадь квадрата = ',p:0:5);end;
end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
18.12.2022
