Question

Составить программу, которая выводит на экран результат целочисленного деления заданного целого числа на 2, если оно чётное

Answer 1

Var c:integer; Begin c:=c mod 5; Writeln(c*c); End.