Написать программу если число чётное то делим на 2 . если ничтое то возводим в квадрат

Question

Информатика: Написать программу если число чётное то делим на 2 . если ничтое то возводим в квадрат

Ashmalikova · Answer

var a: integer;beginreadln(a);if a mod 2=0 then writeln (a/2)else writeln (sqr(a));end.Программа представлена на языке Pascal....