Помогите пожалуйста,оператор case Дано натуральное число 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
Очень запутанное в начале условие. Если число делится на 4, то вывести 4*частное (а частное и есть результат деления на данное число 4)... Получается, что при делении числа на 4 переменной N присвоится значение 4*результат, а это и есть число N.
program vibor;
var
N,k:integer;
begin
writeln('vvedite N');
readln(N);
k:=N mod 4;
case k of
0: writeln(4*k);
1: writeln(4*k+1);
2: writeln(4*k+2);
3: writeln(4*k+3);
end;
end.