Помогите пожалуйста с информатикой

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

Помогите пожалуйста с информатикой


image

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

Ответ:

var a,b: integer;

begin

readln(a);

readln(b);

if (a mod b)=0 then

writeln('Число кратно')

else writeln('Число не кратно');

end.

Объяснение:

(654k баллов)