Напишите функцию, которая возвращает сумму трёх целых чисел.
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.
Напишите процедуру, которая принимает переменную целого типа по ссылке, просит пользователя ввести значение в консоли и инициализирует переменную этим значением (убедитесь, что в теле программы значение изменилось).
Напишите процедуру, которая выводит на экран сумму трёх целых чисел.
program task_2_lesson_14;
var a, b, c, res : integer;
procedure sum3(x, y, z: integer; var sum: integer);
begin
sum := x + y + z;
write(sum);
end;
begin
res := 0;
readln(a,b,c);
sum3(a,b,c,res);
readln();
end.
Напишите функцию, которая возвращает сумму трёх целых чисел.
program task_1_lesson_14;
var a, b, c : integer;
function sum3(x , y, z:integer): integer;
begin
result := x + y + z;
end;
begin
writeln('vvedite 3 chisla');
readln(a, b, c);
writeln(sum3(a, b, c));
readln();
end.
Разница между публикованным и неопубликованным состоянием
git diff origin/имяветки..HEAD
Примечание: если вы используете несколько внеших репозиториев или основной репозиторий у вас отличается по названию от стандартного, то используйте ваше название в команде вместо origin для примеров выше.