Даны 2 целых числа а и b узнать делится ли число а на b или b на а; если делится то вывести ответ на экран,если нет то вывести сумму этих чисел. )

gjhjcznrj gjhjcznrj    3   04.10.2019 00:01    0

Ответы
Lenika2len Lenika2len  09.10.2020 15:39

var a,b:integer;

begin

write('a='); readln(a);

write('b='); readln(b);

if a mod b =0 then writeln('a/b=',a div b);

if b mod a =0 then writeln('b/a=',b div a);

if not(a mod b =0) and not(b mod a =0) then writeln('a+b=',a+b);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика