 
                                    
                                     
                                    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
 
                                    Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.
 
                                     
                                     
                                    