Question

C= Если m≥4 Если m<4 На языке паскаль

Answer 1

Var
m:integer;
Begin
Write('m = ');
ReadLn(m);
if m>= 4 then m:=m*m-8
else m:=m+2;
WriteLn('C = ',m)
End.