Информатика, опубликовано 2018-08-22 20:15:17 by Гость
Получить случайное трехзначное число и вывести через запятую все его отдельные цифры. Сделать для программы Паскаль! с помощью функций div и mod
Ответ оставил Гость
Program lol;
var a,b,c,g,d:integer;
begin
a:=random(999)+ 100;
writeln(a);
b:= a div 100;{1}
c:= a mod 10; {3}
g:= a mod 100;
d:= g div 10;{2}
writeln(Число,a);
writeln( b,, , d,,, c);
readln;
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на