Поделитесь своими знаниями, ответьте на вопрос:
ОЧЕНЬ НАДО ПИШУ ИТОГОВУЮ КОНТРОЛЬНУЮ Запусти Pascal. Введи программу. program 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 43 y 40 sum umn
Відповідь:
program 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.
Результаты работы внеси в т
Пояснення: