Найти и описать ошибки. исправить ошибки. написать - вопрос №10510074 от ilya201296 15.09.2022 17:35

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

ilya201296 · 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.