Rogram pr_1;
var
x,y,sum, umn: integer;
begin
write ('x=');
readln (x);
write ('y=');
readln (y);
sum:=x+y;
umn:=x*y;
writeln ('sum=',sum);
writeln ('umn=',umn);
readln;
end.

Результаты работы внеси в таблицу для заданных x и y.

x
y
sum
umn
24
41

samira21111    2   08.04.2020 17:23    5