Дано натуральное число N. если оно делится на 4, вывести на экран ответ N=4k(где k — соответствующее частное), если остаток от деления на 4 равен 1: N=4k+1, 2: N=4k+2, 3: N=4k+3. например 12=4*3,22=4*5+2- Pascal(Паскаль)

VAR
  a, cel, drob: integer;

BEGIN
  Readln(a);
  drob := a mod 4;
  cel := a div 4;
  if drob = 0 then
    Writeln('4*', cel)
  else
    Writeln('4*', cel, '+', drob);

END.

Похожие записи/страницы:

Leave a Comment

35 − = 26