Ответы
Ответ дал:
0
//Pascal ABC.Net 3.0
var a:integer;
s:string;
begin
randomize;
a:=random(100,999);
str(a,s);
writeln(s[1],' ',s[2],' ',s[3]);
end.
var a:integer;
s:string;
begin
randomize;
a:=random(100,999);
str(a,s);
writeln(s[1],' ',s[2],' ',s[3]);
end.
Похожие вопросы
2 года назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад