30 байт, т.к 1 символ=8 бит, I=8*30=240 бит =>240/8=30 байт
Program prog;
Uses crt;
var a,b, tmp: real;
begin
clrscr;
write('A = ');
readln(a);
write('B = ');
readln(b);
writeln;
if (a<b) then
begin
tmp:=a;
a:=b;
b:=tmp;
end;
writeln ('A = ', a);
writeln ('B = ', b);
end.
К форматированию таблиц относится 1 5 6 8
Поскольку a не менялось, ничего не присваивалось, то оно как было так и осталось 7
Найдем b через подстановку
5 = b + 7
b = 7 - 5 = 2