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

Найти все двузначные числа, кратные 3. паскаль. через repeat, until

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

ZikZaka2

02.11.2021 05:47

Как называется этот дизайн в power point?...

fizik24

18.03.2020 16:22

Дан фрагмент программы: x := 0; for i := -10 to 10 do x := x + i; 1)Сколько раз будет выполнен цикл? 2)Введите целое число или десятичную дробь… Чему будет равно значение...

ЭлинаПринцесса55555

05.09.2022 23:44

Постройте блок-схему и напишите программу на алгоритмическом языке Введите число а. Если оно четное, разделите его на 4, если нечетное - умножьте на 5. Результат представьте...

lenochkasadyho

06.06.2022 17:12

:3 дан массив из 15 вещественных чисел. элементы массива вводятся по формуле i*1.5+1 вывести элементы массива с комментариями....

danaj04

11.06.2020 20:08

Подскажите как перевести 36 в 8 в двоичную систему счисления...

dehezy

11.06.2020 20:08

Текст составлен с использованием алфавита мощностью 256 символа и содержит 200 символов. каков информационный объем текста...

петрович16

18.11.2021 19:29

Файл размером 160 кбайт передаётся через некоторое соединение со скоростью 2048 бит в секунду . определите размер файла ( в кбайт ) , которые можно передать за то же...

annazukova28

27.09.2022 02:11

С! продолжите последовательность -7, -3, 5, 21, … , выписав следующие !...

Кукарику12

14.08.2020 23:14

Объясните 2 по информатике егэ доступным языком для новичка. ((x ∧ ¬y) ∨ (w → z)) ≡ (z ≡ x).а конкретнее почему переменные стоят в порядке zywx....

Kristina1536289

04.04.2023 15:16

Ушаховому турнірі брали участь шість гравців з різних міст росії: іркутська, воркути, саратова, тюмені, уфи, і рязані .у першому турнірі олександр грав з представником...

Ответ:

annamikhaylova5

02.10.2020 20:04

Var
a, i: integer;

begin
a:=0;
i:=10;
repeat
if ((i mod 3) = 0) then
a:=a+1;
i:=i+1;
until i = 100;
writeln(a);
end.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку