Получить случайное трехзначное число и вывести через пробел его отдельные цифры.
Получить случайное трехзначное число и вывести через пробел его отдельные цифры.
Ответ(ы) на вопрос:
//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.
Не нашли ответ?
Похожие вопросы