Задача 3 Урок 14
Primary tabs
Напишите процедуру, которая принимает переменную целого типа по ссылке, просит пользователя ввести значение в консоли и инициализирует переменную этим значением (убедитесь, что в теле программы значение изменилось).
var a: integer; procedure SS(var r: integer); begin r := 1; end; begin write('a = '); readln(a); SS(a); write(a); readln(); end.
- Log in to post comments
- 1318 reads
vedro-compota
Sun, 08/08/2021 - 12:57
Permalink
решение засчитано
решение засчитано
_____________
матфак вгу и остальная классика =)