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