Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
AdinaKhamzina1
27.01.2022 09:43 •
Информатика
Паскаль программа
кароче надо с randomize вывести 10 чисел от 1 до 100
Ответ:
bereza11
25.01.2021 09:43
var i: integer;
a:real;
begin
randomize;
for i:=1 to 10 do
begin
a:=random(1,100);
writeln(a);
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
GrootShkolnik
30.05.2020 10:18
2) опишите на языке или одном из языков программирования алгоритм подсчета максимального количества подряд идущих отрицательных элементов в целочисленном массиве длины 30....
batareya666
30.05.2020 10:18
1)для какого из чисел ложно высказывание не (число 50) или (число чётное) а)48 б)49 в)50 г)51...
arinalapshakova
27.07.2021 16:59
Для заданного логического выражения: 1) Построить таблицу истинности; 2) Упростить высказывания, используя законы алгебры логики; 3) Полученный результат проверить, построив...
kauymbek
15.07.2021 11:34
с информатикой 7-го класса. 10. Монитор с разрешающей 1024 x 768 пикселейработает в графическом режиме High Color (65 536 цветов впалитре). Определите объём видеопамяти компьютера...
Anuxi1488
04.05.2023 10:30
2. Составить таблицу истинности выражения A и (не В) и (не С) C таблицей...
romankulikov20
05.12.2020 07:30
Найти произведение элементов целочисленного одномерного массива с нечетными номерами, состоящего из N элементов. Элементы вводятся с клавиатуры....
Max010507
15.03.2020 19:58
Назовите слова, как можно больше, из 5 бкув с окончанием бак...
ksu1371
27.05.2021 10:27
Дан массив а ( 28 ) . найти сумму положитель ых элементов массива . если сумма будет больше 100 , то обнулить элементы в чётных ячейках , ссли сумма будет меньше или равна...
лосимус
27.05.2021 10:27
Microsoft access. назначение запросов. составление запросов бд. хелп ) экзамен, хоть что то опишите, )...
михалыч676
12.08.2020 03:04
40.Машина проехала с одного города до другого за 3 дня. Машина в первый день за 4 ч со скоростью 52,8км/ч проехала 12% от всего пути, во второй день 60% от оставшегося. Найдите...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var i: integer;
a:real;
begin
randomize;
for i:=1 to 10 do
begin
a:=random(1,100);
writeln(a);
end;
end.