Восновной программе запросить у пользователя ввод 4 чисел, при процедуры перемножить первое и третье число и передать ответ основной программе для вывода на экран. сложить вторую и четвертую переменную при функции. вывести результат на экран.

185

432

Посмотреть ответы 2

Ответы на вопрос:

vmartynova77

Информатика

4,8(12 оценок)

Procedure multiply(x, y: integer; var res: integer);
begin
res : = x * y;
end;

function add(x, y: integer): integer;
begin
add : = x + y;
end;

var
a, b, c, d, res1, res2: integer;
begin
read(a, b, c, d);
multiply(a, c, res1);
res2 : = add(b, d);

writeln(res1);
writeln(res2);
end.