ПОМОГИТЕ ОЧЕНЬ НАДО ПИШУ ИТОГОВУЮ КОНТРОЛЬНУЮ Запусти Pascal. Введи программу. program...

0 голосов
107 просмотров

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


Информатика (71 баллов) | 107 просмотров
Дан 1 ответ
0 голосов

Відповідь:

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.

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

Пояснення:

(68 баллов)