8. Какая из данных программ на Паскале правильная: 1) var r: real; begin read(r); if rеа then write(a); end. 2) var a, r: real; begin read(r); if r=a then write(a); end. 3) var a: real; begin read(r); if r=a then write(a); end. 4)var a, r: real; begin read(r); ifr:=a then write(a); end.