Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Fromsay
30.05.2023 05:37 •
Информатика
Напишите программу, вводящую трехзначное число, первая цифра которого равна единице, вторая принадлежит промежутку от 1 до 7, а третья на две единицы больше второй.
Ответ:
VLev147741
03.08.2020 13:24
Var a,b:byte;
Begin
Randomize;
a:=random(7)+1;
b:=a+2;
Write(1,a,b)
End.
0,0
(0 оценок)
Ответ:
POMIPO
03.08.2020 13:24
Var a,b,c:integer;
begin
randomize;
a:=1;
b:=random(1,7);
c:=b+2;
writeln (a,b,c);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
yaroshenkopoli
13.10.2020 16:49
Режим индексированных цветов что это?...
laisysergant2002
13.10.2020 16:49
Немножко переделать программу. она выводит кол-во повторений всех слов, а надо, чтобы выводила только самое частое слово print( введите имя файла со стихотворением ) f = open(...
Aksiomsa868589
05.05.2022 12:00
1) задано натуральное число n. составить программу для вычисления s=1+3+5+…+n 2) подсчитать количество четных элементов в каждом столбце матрицы размером мхn....
Влад11737463
05.05.2022 12:00
Если не будет снега и будет морозно, то мы пойдем на каток и оденемся потеплее или возьмем термос с чаем. написать простые высказывания, которые есть в этом утверждении, написать...
ynal2001
26.02.2023 13:20
) Проверочная работа Решение задач «Алфавитный подход» 1.Определите мощность алфавита, если вес одного символа равен 5 бит. 2.«Статья, набранная на компьютере, содержит 16 страниц,...
Artur1Khasanov
20.02.2021 20:57
Найдите 3 ошибки и исправьте их print( This programm takes three numbers and returns the sum ) total = 0 for i in range (3): x = input ( Enter a number: ) total = total + i print(...
BlackStile
11.12.2022 01:02
Найдите объём памяти для страниц печатного текста,если в строке размещайся 52 символа,на листе 60 строк...
lemarakurtazhiv
20.09.2022 21:06
Между населёнными пунктами a, b, c, d, e построены дороги, протяжённость которых (в километрах) приведена в таблице. определите длину кратчайшего пути между пунктами...
fnnifnnr
28.04.2023 07:47
Исполнитель чертёжник перемещается на координатной плоскости, оставляя след в виде линии. чертёжник может выполнять команду сместиться на (a, b) (где a, b — целые...
YaShKa111111
14.04.2023 05:39
1. напишите программу которая заменяет во всей строке одну последовательность символов на другуювведите строку: (x y) and (y x) and (z y) and (z 5) что менаем : and чем заменяем...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Begin
Randomize;
a:=random(7)+1;
b:=a+2;
Write(1,a,b)
End.
begin
randomize;
a:=1;
b:=random(1,7);
c:=b+2;
writeln (a,b,c);
end.