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