Задача 1 Урок 14
Primary tabs
Напишите функцию, которая возвращает сумму трёх целых чисел.
var a, b, c: integer; function sum(x, y, z: integer): integer; begin result := x + y + z; end; begin writeln('Введите 3 целых числа:'); readln(a, b, c); writeln(sum(a, b, c)); readln(); end.
- Log in to post comments
- 400 reads