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

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

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

↓

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

Лиля177

11.11.2021 19:43

3. Напишите наибольшее число x, для которого истинно высказывание: (x 42) И НЕ (в числе x нет одинаковых цифр...

юлияиванова1

03.04.2021 04:59

Дескрименация звука (преобразование из аналоговой фотрмы в цифровую) производится при микрофона 2) аккустических колонок 3) звуковой карты...

FairTail

20.04.2020 20:52

7,8 , только а)(информатика, 9 класс, овчинникова, 2019)...

FHN2017

21.10.2021 11:18

Что будет выведено на экран в результате работы программы? нарисуйте дерево рекурсивных вызовов? program main; procedure f (n: integer); begin write(n); if n 2 then begin f(n-3);...

homeLoL

07.02.2022 14:52

Pobeda-2014 информатика решите на с++ как известно, современные видеокарты умеют формировать изображения с использованием только треугольников. видеокарта pobeda-2014 не отстает...

VAliokiopop

08.05.2021 02:49

Дано действительное число x. вычислить с точностью 10^-6(расписать в паскаль)...

sanya1130

02.05.2022 14:35

Как доказать, что информационная культура тесно связана с общечеловеческой культурой? ...

ladykati

26.07.2021 14:53

Зал имеет форму правильного шестиугольника. винтик и шпунтик решили разбить его на несколько частей, состоящих из правильных шестиугольников. вот что у них получилось. напиши...

arseniybox

16.04.2021 14:18

Вибери правильно записані формули =A1+2*C3 =A1+2C3 =A1+2x C1=А1+C3 =A1+C3*2% Несколько правильных видповидей...

derotasgo

11.03.2021 15:23

Проаналізуй наведений фрагмент коду і визнач результат виконання команди print...

Ответ:

804mdv

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 оценок)

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

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