После чего исполняемый старовый файл можно запустить снова, если выполненные команды выше не помогли, посмотрите под какими именами работают процессы постмана:
Напишите процедуру, которая принимает переменную целого типа по ссылке, просит пользователя ввести значение в консоли и инициализирует переменную этим значением (убедитесь, что в теле программы значение изменилось).
var a: integer;
procedure chislo(var x: integer);
begin
write('Введите целое число: ');
readln(x);
end;
begin
writeln('a=', a);
chislo(a);
writeln('a=', a);
readln();
end.
Напишите процедуру, которая выводит на экран сумму трёх целых чисел.
procedure sum(x, y, z: integer);
begin
writeln(x + y + z);
end;
var a, b, c: integer;
begin
writeln('Введите 3 целых числа:');
readln(a, b, c);
sum(a, b, c);
readln();
end.
Напишите функцию, которая возвращает сумму трёх целых чисел.
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.
Пользователь вводит целое положительное число N, если оно не соответствует критериям (то есть не является положительным), выведете сообщение об ошибке, в противном случае выведите на экран все числа последовательности, не большие N, сформированной следующим образом: