Урок 14.1 Задача 5
Primary tabs
У вас есть код:
var b: integer; procedure p2(); var a: integer; begin a:=4; writeln('a=', a); writeln('b=', b); end; begin writeln('Введите значение b:'); readln(b); p2(); end.-- перепишите его так, чтобы процедура не зависила от глобальное переменной b, а получала ее на вход, при этом определяется переменная b (запрос на ввод значения и readln) пусть как и раньше в теле основной программы.
Решение:
program Project1; procedure p2(); var a, b: integer; begin a:=4; writeln('a=', a); writeln('b=', b); end; var b: integer; begin writeln('Введите значение b:'); readln(b); p2(); end.
- Log in to post comments
- 1319 reads
vedro-compota
Wed, 10/26/2022 - 20:08
Permalink
поведение программы
поведение программы изменилось, а должно остаться тем же
исправить
_____________
матфак вгу и остальная классика =)
kuznmax
Mon, 10/31/2022 - 15:22
Permalink
Исправил
vedro-compota
Sat, 11/12/2022 - 18:18
Permalink
засчитано
засчитано
_____________
матфак вгу и остальная классика =)