Урок 14 Задача 1
Primary tabs
Напишите функцию, которая возвращает сумму трёх целых чисел.
Решение:
var s,k,m,n: integer; function sum3(a,b,c: integer): integer; begin result:=a+b+c; end; begin k:=1; m:=2; n:=3; s:=sum3(k,m,n); writeln('summa = ',s); readln(); end.
Консоль:
summa = 6
- Log in to post comments
- 450 reads