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

Вывести на экран все числа делящиеся на 3 или на 7 в промежутке от 1 до 1000

Показать ответ

Ответ:

ansher76

23.05.2020 15:21

var i:integer;

begin

for i:=1 to 1000 do

if (i mod 3=0) or (i mod 7=0) then write(i);

end.

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

Популярные вопросы: Информатика

Diana12345678910123

11.03.2020 12:05

Выполнить операцию вычитания: 1)02-2; 2)12-101112; 3)1010102-1001012; 4)1110012-1001002; 5)7574738-2736548; 6)3575778-2340758; 7)f0010c16-5ff1fe16; 8)ee895216-2c627516;...

arusy

08.12.2022 01:25

Создайте схему описывающие компьютеры...

missgur04

13.09.2022 09:34

1.выполнить операцию сложения: 1)1101012+1001002; 2)1101012+1010112; 3)1101112+1001012; 4)1010112+1010112; 5)2340758+1235028; 6)2736548+4636178; 7)5264548+1513248; 8)2с627516+с226dd16;...

kama1ezeGggggg

03.02.2021 06:51

Дан фрагмент электронной таблицы. a b c 1 15 = 15/c2 2 6 = a1+a2 = 15*a1 определи значение, записанное в ячейке b1, если оно скопировано с ячейки a1....

emmka1

14.04.2022 02:35

Жили были клавиатура монитор память и процессор продолжить рассказ погите пож только не с инета...

nastya892968060

14.04.2022 02:35

Какую информацию можно получить не прикасаясь к предмету?...

akena0932

24.05.2021 16:02

Что можно отнести к отличным признакам объекта?...

dmitrius2

13.01.2022 07:29

Какое логическое выражение равносильно выражению ¬а λ (а v ¬с) 1) a λ ¬c 2) a v ¬c 3) ¬a λ ¬c 4) ¬a v ¬c , с объяснением...

antonenko62

12.09.2020 23:20

Из предложенного перечня выпишите отдельно названия физических тел: парта, мяч, пластмасса, проволока, сахар-рафинад, алюминий, стакан, резина, глина, железо, карандаш,...

Ученик12090

23.04.2020 05:41

1. У реакцію «срібного дзеркала» вступає: а) глюкоза, б) фруктоза, в) сахароза, г) крохмаль 2. Синє забарвлення з розчином йоду дає а) глюкоза, б) крохмаль, в) целюлоза,...

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

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