Question

Дано натуральное число N. Если оно делится на 4, вывести на экран ответ N=4k ( где k соответствующее частное), если остаток от деления на 4 равен 1, N=4k+1, если остаток на 4 равен 2 N=4k+2, если остаток от деления на 4 равен 3 N=4k+3, например 12=43, 22=45+2

Answer 1

Код Pascal1 2 3 4 5 6 7 8 9 Var   n,k: Integer; BEGIN Writeln('Введите N: '); Readln(n); Writeln('Введите K: '); Readln(k); If n mod 4=0 Then Writeln(4*k) Else If n mod 4=2 Then Writeln(4*k+2) Else If n mod 4=3 Then Writeln(4*k+3); END.