Делителем каких чисел a,d,c являетса число kk

0 голосов
28 просмотров

Делителем каких чисел a,d,c являетса число kk


Информатика (18 баллов) | 28 просмотров
Дан 1 ответ
0 голосов

var

 a, b, c, k : integer;

begin

 read (a, b, c, k);

 if (a mod k <> 0) and (b mod k <> 0) and (c mod k <> 0) then writeln ('Никаких')

 else begin

   if a mod k = 0 then writeln ('a');

   if b mod k = 0 then writeln ('b');

   if c mod k = 0 then writeln ('c');

 end;

end.

(30 баллов)