Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

делится ли число а на число b без остатка? написать в виде разветвляющего алгоритма.

Ответ оставил Гость

program pr;
uses crt;
Var a,b:integer;
Begin
Writeln(vvedite a,b);
readln(a);
readln(b);
if a mod b=0 then Writeln(da)
             else Writeln(not);
readln;
end.