написать программку которая random039;ным образом задает число с интервалом (-99999;99999). с

Написать программку которая random'ным образом задает число с интервалом (-99999;99999). с подмогою признаков делимости узнать, делится ли число на 3

Задать свой вопрос
Данил
язык - паскаль
1 ответ
На каком языке нужно написать программу?

Лидия Тартачная
паскаль
Каллей Костян
var a:integer;begin randomize; a:=random(-99999,99999); if a mod 3=0 then writeln('число',' ',a,' ','делится',' ','на 3 ') else writeln('число',' ',a,' ','не делится',' ','на 3 ') end.
Серж Ардашкин
Метод понятен?
Эвелина Попинако
var a:integer;begin randomize; a:=random(-99999,99999); if a mod 3=0 then writeln('число ',a,' делится на 3') else writeln('число ',a,' не делится на 3') end. (Лучше это, я тупанул с выводом)
Sema
спасибо)
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт