Задача 2 урок 14 Процедура, пример решения задачи
Primary tabs
Напишите процедуру, которая выводит на экран сумму трёх целых чисел.
var a, b, c, d: integer; procedure sum(x, y, z: integer; var v: integer); // начало объявления процедуры begin writeln(v); v := x + y + z; writeln(v); end; // конец тела процедуры begin // начало тела программы write('Введите два числа: '); readln(a, b, c); // ввод процедуры sum(a, b, c, d); // Вычисление процедуры writeln(d); readln(); end.
- Log in to post comments
- 3442 reads
vedro-compota
Fri, 04/10/2020 - 19:15
Permalink
уточните
зачем в сигнатуре 4-я переменная?
_____________
матфак вгу и остальная классика =)
pakot
Fri, 04/10/2020 - 22:05
Permalink
var
vedro-compota
Fri, 04/10/2020 - 22:08
Permalink
засчитано с уточнением
это не ввод процедуры, а скорее получение значений переменных обычное.
Решение в целом засчитано.
_____________
матфак вгу и остальная классика =)