Помогите по информатике Нужно составить программу в паскале Номер 54 (7)
Var a, b, c:real; d:boolean; Begin Readln(a, b, c); If (a=c) then d:=true Else d:=false; End.