Неверное число параметров процедуры - Pascal
Формулировка задачи:
Неверное число параметров процедуры.
uses crt; var a,b:real; procedure prm(a,b:real;var p:real); begin p:=2*a+2*b; writeln('Периметр=',p:0:2); end; begin Write('Введите длину прямоугольника а и ширину b : ');readln(a,b); writeln(prm(a,b):0:2); end.
Решение задачи: «Неверное число параметров процедуры»
textual
Листинг программы
uses crt; procedure prm(a,b:real;var p:real); begin p:=2*a+2*b; writeln('Периметр=',p:0:2); end; var a,b,p:real; begin Write('Введите длину прямоугольника а и ширину b : '); readln(a,b); prm(a,b,p); //это процедура, а не функция и у нее 3 параметра end.
Объяснение кода листинга программы
- Объявляются переменные:
a
- для хранения длины прямоугольника,b
- для хранения ширины прямоугольника,p
- для хранения периметра прямоугольника.
- Выводится запрос на ввод длины
a
и шириныb
прямоугольника. - Пользователь вводит значения для
a
иb
. - Вызывается процедура
prm
с параметрамиa
,b
иp
. - Внутри процедуры
prm
выполняется расчет периметра по формуле p=2a+2b. - Полученное значение периметра выводится на экран, например,
Периметр=значение_периметра
. - Программа завершается.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д