)вычислите значение целочисленной переменной с при а=26 и b=6 b: =mod(a,b)+4 c: =mod(a,b)+1 нужна полностью написанная программа.

Var
  a,b,c:integer;
begin
  a:=26;
  b:=6;
  b:=a mod b+4;
  c:=a mod b+1;
  writeln('a=',a,'  b=', b,'  c=',c)
end.

Тестовое решение:

a=26  b=6  c=3