Question

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

Answer 1

На каком языке требуется написать программу?

Answer 2

паскаль

Answer 3

var a:integer;
begin
randomize;
a:=random(-99999,99999);
if a mod 3=0 then writeln('число',' ',a,' ','делится',' ','на 3 ') else writeln('число',' ',a,' ','не делится',' ','на 3 ')
end.

Answer 4

Алгоритм понятен?

Answer 5

var a:integer;
begin
randomize;
a:=random(-99999,99999);
if a mod 3=0 then writeln('число ',a,' делится на 3') else writeln('число ',a,' не делится на 3')
end. (Лучше это, я тупанул с выводом)

Answer 6

спасибо)