logo
Войти Регистрация Спроси ai-bota


ibatullinazuhra
05.01.2023 21:26

Програма, яка б перевірила чи дане число є трьохзначним і ділиться на 3. Pascal ABC

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
cat493
cat493
04.11.2021 11:26
Решите Сообщение, записанное буквами из 16-символьного алфавита, содержит 200 символов. Какой объём информации в Байтах оно несёт? 2.информационное сообщение объёмом 4 КБ...
dashazoriksv
dashazoriksv
17.10.2020 12:53
4. Воспользовавшись моделью, построенной в примере 4, опреде- лите, за сколько часов бассейн может быть наполнен черезпервую трубу, если через вторую он заполняется за 24...
gggg132
gggg132
28.09.2022 13:35
Значения элементов массива А, состоящего из 10 элементов, равны соответственно: 5, 7, 6, 0, 3, т. е. A[0] = 5, A[1] = 7 и т. д. В результате выполнения фрагмента программы:...
Aniri1501
Aniri1501
31.01.2023 13:36
Скласти програму, яка обчислює дійсне числове значення функції y = 3−4−2/2+1 за введеними цілочисленими значеннями аргументів та виводить формулу, проміжні обчислення та...
danilvetrov47p083sl
danilvetrov47p083sl
03.03.2021 21:18
фотка вот в таблице которая админы не баньте...
Marína19112006
Marína19112006
14.06.2021 00:55
2 задание, начинается как: Where does Ben live? 3 задание, начинается как: Have you finished your homework... 5 задание, начинается: My mom’s brother... 7 и 8 Хоть что-то...
kirillbatalov2
kirillbatalov2
10.03.2021 19:34
Ортағасырлық мемлекеттердің құлдырау себептерін анықтандар.Оғыз мемлекеті-​...
Kristibabiba098
Kristibabiba098
25.09.2020 16:12
Найдите сумму чисел 101011+38 ответ запишите в двоичном системе счисления​...
помогите1170
помогите1170
25.09.2020 16:12
задайте формулою функцію виду у=к/х якщо її графік проходить через точку(-1/2 4) знайти значення функції при х=-2...
кал12
кал12
11.06.2022 21:59
48 The Passive: by phrases Use the cues in brackets to answer the questions. Use the Passive and by phrases. 1 Who discovered the hole in the ozone layer? The hole in the...
Ответ:
bigzaur777
04.05.2021 14:20

var a: integer;

begin

read(a);

write ((a>99)and(a<1000)and(a mod 3 = 0))

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота