Написать программу нахождения суммы трёх целых чисел

Я напишу код на одном из базовых языков программирования, языке Pascal

Program z_1;

var

x,y,z,sum:integer;

begin

sum:=0;

writeln(\' Введите  первое число\');

readln(x);

writeln(\'Введите второе число\');

readln(y);

writeln(\'Введите третье число\');

readln(z);

Sum:=x+y+z;

writeln(\'Сумма трех введенных вами чисел равно: \', sum);

readln;

end.