tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Получить случайное трехзначное
Получить случайное трехзначное число и вывести через пробел его отдельные цифры. в языке програмирование python или pascal
kislayaya13
2 14.07.2019 22:40
1
Ответы
leiylacan1
20.09.2020 18:36
// PascalABC.NET 3.0, сборка 1139 от 10.01.2016
begin
Randomize;
Random(100,999).ToString.Println('').Println;
end.
Тестовое решение:
497
4 9 7
ПОКАЗАТЬ ОТВЕТЫ
arinuhkas
20.09.2020 18:36
//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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
kostyafadeev9
26.05.2019 19:56
Дали , а как делать не понятно 1. зарезервируйте регион, состоящий из некоторого количества страниц, а затем осуществляйте передачу по одной странице используя функцию virtualalloc....
Алисик980
18.12.2020 22:30
Вопрос Опреде лите, что будет напечатано в результате выполнения программы: Program mas6; Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1]:= 1; Dat[2]:= 9; Dat[3]:=...
taisiachervatuk
18.12.2020 22:33
Решите с подробным решением очень надо...
АполинарияТВ
18.12.2020 22:34
Программисту было поручено написать программу нахождения суммы отрицательных элементов одномерного массива. Программист разработал программу, но допустил в ней одну ошибку. Текст...
KLIN50
18.12.2020 22:35
Определите значение переменной c после выполнения следующего фрагмента программы: a := 6; b := 15; a := b – a*2; if a b then c := a + b else c := b – a; Пишите с решением!...
YeezyM
18.12.2020 22:36
Дан одномерный массив а из шести элементов: -125 200 10 6 43 11 1) Как объявить этот массив в программе, записанной на языке Паскаль? 2) Чему равно значение элемента массива...
ilyamaximov514
16.12.2020 16:33
Напишите программу для решения следующей задачи. На контрольной работе по алгебре ученикам 9 класса было предложено 10 примеров. Неудовлетворительная оценка выставляется, если...
макс3013
16.12.2020 16:33
Белги жана жазуу турундогу модель деген эмне? ...
yulechkapopova4
16.12.2020 16:32
Какие профессии связаны с нейронными сетями уже есть и какие могут появиться в будущем...
Znoke99
13.11.2020 11:49
ответить на вопросы. 1. Как связаны информационная модель общения и субъектно-объектная схема обучения? 2. Что значит для учителя репрезентативная функция общения? 3. В чем разница...
Популярные вопросы
Встановіть відповідність. «Хто в якій армії воював?»твір подвійне коло 1.Іван...
3
З двох міст, відстань між якими 204 км, виїхали одночасно назустрічодин одному...
2
Составьте текст по Европейскому северу. по плану: 1)состав; 2)границы; 3)эгп;...
3
Якa мaca coлі утвopитьcя пpи взaємoдiї 80г кyпpyм oксидy з хлopидною киcлoтою?...
3
1.Что означает эпиграф к пьесе Ревизор. 2.Что такое Хлестаковщина...
1
який об`єм кисню витратиться на спалювання 200мл суміші водню та С2 О? Чи...
1
Учебное задание Определите черты сходства и различия в деятельности двух монархов:...
1
Величина x у 7 разів менша від величини y . виразіть x через y...
2
Найдите расстояние в еденичных отрезках между точками М (-4) и N(2) кординатной...
3
|x|=21 |x|=-1 |x|=0 До іть будь ласка...
3
begin
Randomize;
Random(100,999).ToString.Println('').Println;
end.
Тестовое решение:
497
4 9 7
var a:integer;
s:string;
begin
randomize;
a:=random(100,999);
str(a,s);
writeln(s[1],' ',s[2],' ',s[3]);
end.