ОЧЕНЬ НАДО ПИШУ ИТОГОВУЮ КОНТРОЛЬНУЮ
Запусти 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

машаоляапро машаоляапро    1   16.05.2020 17:26    9

Ответы
fomenko6 fomenko6  16.05.2020 17:30

Відповідь:

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.

Результаты работы внеси в т

Пояснення:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика