Найти и описать ошибки. исправить ошибки. написать - вопрос №10509572 от Срочный103 26.06.2022 01:55

Question

Информатика: Найти и описать ошибки. исправить ошибки. написать результат программы const a: byte; x; y: integer, v: real, // переменная begin write( введите x,y: ), readln(x,y), v = x, x = y, y = v, writeln( новые значения x,y: ,x, ,y), end

Срочный103 · Answer

var

x, y: integer;

v: integer;// вс переменная

begin

write('Введите x,y: ');

readln(x, y);

v := x;

x := y;

y := v;

writeln('Новые значения x,y: ', x, ' ', y)

end.