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

Вывести все числа от 1 до 1000, которые: -- кратны 3 и 5

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

↓

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

Настя55251

01.03.2021 03:14

Дано два числа. Порахувати різницю більшого та меншого, тобто від більшого значення віднятименше, та вивести результат на екран...

Kamillka005

03.02.2022 01:01

Что такое беспроводная сеть вопрос...

AlsuApuseva

20.10.2021 07:58

Найти сумму нечетных чисел от 11 до 19....

Vasilchenkodan

20.10.2021 07:58

Улітньому таборі відпочиває 25 дітей. серед них 20 дітей у віці до 15 років і 15 дітей у віці від 10 років. чи можливе таке?...

амина653

29.12.2020 17:45

Организуйте в консольном приложении ввод массива декартовых координат n точек в трёхмерном пространстве. вычислите массив полярных координат этих точек и организуйте вывод этого массива....

батуми1

06.08.2021 10:39

Дана строка. указать те слова, которые содержат хотя бы одну букву k. составить программу на паскаль. заранее ^_^...

sergazinaaidana

20.04.2020 20:00

Программа запрашивает целое число и определяет четное или нечетно. составить блок схему и программу....

Angelina10001

24.05.2020 23:51

ответить что тут правильно...

NeGaTiV1488228

07.05.2021 22:48

Дополни предложение Функция СЧЕТЕСЛИ вычисляет непустых ячеек в диапазоне, удовлетворяющем заданному ....

persik21783086532

23.12.2021 09:57

Задание 2 Сообщение передается шифром. В нём присутствуют только буквы из приведённого фрагмента кодовой таблицы. Ш К О Л А 01 11 100 101 10 Определите, какое сообщение закодировано...

Ответ:

Interworm

20.07.2020 23:55

Var a:integer;
begin
for a:=1000 downto 1 do begin
if (a mod 5 = 0) and (a mod 3 = 0)
then writeln(a);
end;
end.

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

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

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