Решение №3 из главы 14.Напишите процедуру, которая принимает переменную целого типа по ссылке
Primary tabs
Напишите процедуру, которая принимает переменную целого типа по ссылке, просит пользователя ввести значение в консоли и инициализирует переменную этим значением (убедитесь, что в теле программы значение изменилось).
program pascal_procedure2; var k : integer; procedure conclusion( var s : integer ); // начало обьявления процедуры begin // начало тела процедуры write( 'Input digit :' ); readln( s ); end; // конец тела процедуры begin // начало тела основной программы k := 54; // writeln( 'value1 variablе k = ' , k ); // значение до вызова процедуры conclusion(k); // вызов процедуры writeln( 'value2 variablе k = ' , k ); end. // конец тела основной программы
- Log in to post comments
- 2076 reads
vedro-compota
Sat, 05/09/2020 - 10:53
Permalink
уточнение
-- будет ли тут продемонстрировано изменение значения?
_____________
матфак вгу и остальная классика =)