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


nikbudokay02
06.06.2023 10:56

Напишите программу при оператора random, a: array [1..10] of integer; для : определить сумму цифр трехзначного числа кратных 4 на языке паскаль!

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
nataliyadydina
nataliyadydina
08.06.2020 23:06
перевести числа в двоичную систему счисления и произвести проверку...
Yanaaa13
Yanaaa13
04.05.2020 05:56
Ниже записана программа. Получив на вход число x, эта программа печатает два числа, a и b. Укажите наименьшее из чисел x, при вводе которых алгоритм печатает сначала...
lexa123assasin
lexa123assasin
25.03.2023 23:22
Даны два числа в двоичной системе счисления 11001101 и 111011, требуется найти из сумму в двоичной системе счисления. (для нахождения суммы требуется их перевести...
User5281
User5281
31.07.2021 05:42
Даны два числа в двоичной системе счисления 11001101 и 111011, требуется найти из сумму в двоичной системе счисления. (для нахождения суммы требуется их перевести...
caramel1701
caramel1701
31.10.2022 04:09
Котенок уменьшается в размере и увеличивается до нормальногоразмера.Вернуть нормальный размер спрайтаСпрайт исчезнетСпрайт появитсяКотенок исчезает и появляется.​...
optymus
optymus
28.06.2022 08:16
Написать программу Алгоритм решения задачи: 1. Ввести число N. 2. Присвоить x единицу. 3. Пока x * x n 3.1. Вывести x*x. 3.2. Увеличить значение x на единицу....
VovanGh165
VovanGh165
04.04.2020 20:56
Как правильно записать формулу, чтобы подсчитать A12 Выберите один из 4 вариантов ответа: 1) =A1*2+3*B1*3 2) =A1^2+3*B1^3 3) =A1*2+3*B1^3 4) =A1^2+3*B1*3 Укажите...
Saveliy111
Saveliy111
04.04.2020 20:56
[PASCALABC] Создать объект BitString для работы с битовой строкой длиной 8 бит. Определить метод инициализации бинарного числа, а также получения его инверсии и...
Диана1Котова
Диана1Котова
21.04.2022 03:11
Быыыстро В таблице приведены за и количество страниц найденных по ним сайтов в сегменте сети. За Найдено сайтов (в тысячах) ДОМ 50 ХИЖИНА 80 ЖИЛИЩЕ 100 ДОМ&ЖИЛИЩЕ...
sashenkakoster
sashenkakoster
15.10.2021 19:24
Найдите ошибки в написанной программе...
Ответ:
Gora583Иришка
09.10.2020 03:35

begin

var(v,r):=ReadInteger2;

if V<=R-100 then Println('Пройдет')

else Println('Не пройдет')

end.

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