Регистрация
Войти
Стать экспертом Правила
Информатика

Батырхан любит числа котрые без остатка делятся на число 3

ОТВЕТЫ
Program n3;
var x,n:integer;
begin
write(x:); read(x);
if x mod 3=0 then write(цифра делятся на 3)
                             else write(цифра делятся не 3);
end.
3 , 6 , 9 , 12 , 15 , и т.д
23
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам