СРОЧНО ЗАДАНИЕ 4 Написать на языке ПАСКАЛЯ!!!!
а говорила, что там легко и сама сделаешь )
Var a:real; begin readln(a); a:=a/2; writeln(a); end.