Вход
Регистрация
О проекте Как заработать?
48

ПОМОГИТЕ ПОЖАЛУЙСТА! Вводим натуральное число…

marmora 29 марта 2023

ПОМОГИТЕ ПОЖАЛУЙСТА! Вводим натуральное число N. Программа выписывает все натуральные числа, делящиеся на 3 без остатка, до N. Напишите пожалуйста программу (Паскаль) пожалуйста очень вас прошу

категория: информатика
ответить
в избранное

43

Uses crt; var n,i: integer; beginreadln (n); for i: =1 to n doif (i mod 3=0) then writeln (i); end.

пользователи выбрали этот ответ лучшим
комментировать
в избранное ссылка отблагодарить

Знаете другой ответ?
Другие вопросы по информатике
shaxr
29 марта 2023
1
ответ
Помогите написать задачу напомогите написать задачу на с + Хулиганы Первый и Второй очень не любят доску почета своей школы. Поэтому они решили наглым образом украсть оттуда школьную стенгазету, сделанную отличниками, и порвать на части. Первый хулиган брал кусочек газеты и рвал его на 4 части, а Второй хулиган – на 7. Однако очень скоро дежурные нашли N кусочков этой газеты. Им стало интересно, все ли кусочки они нашли. Помогите им. Дежурные так старались, что упустить из виду они могли не более 2 кусочков. Входные данные Натуральное число N < 1018. Выходные данные Выведите “Yes”, если все кусочки найдены, и “No” – в противном случае. ПримерВход Выход 4 Yes 67 Yes 11 No
splin
29 марта 2023
1
ответ
Какое из сообщений несет больше информации: а) В результате подбрасывания монеты (орел, решка) выпала решка. Б) На светофоре (красный, желтый, зеленый) сейчас горит зеленый свет. В) В результате подбрасывания игральной кости (1, 2, 3, 4, 5, 6) выпало 3 очка.
goruch
29 марта 2023
1
ответ
Срочно! Помогите! Запишите строку русских букв, про которую не верно ни одно из утверждений: Ее длина больше 7Ее длина меньше 5Вэтой строке встречаются две гласные буквы, стоящие рядомСтрока начинается с гласной буквыВ строке нет ни одной буквы АВ строке есть только одна из букв А, Б, В. Решением может быть как неосмысленная строка символов, так и слово русского языка. В случае, если в качестве ответа представлено слово русского языка, будут начислены дополнительные баллы.
alexkuzmich
29 марта 2023
1
ответ
Опишите правила входа в систему ОС Windows.
enid-hynde
29 марта 2023
1
ответ
Дан двумерный массив 4 из 4 строк и 7 столбцой. Найти сумму положительных элементовмассива.
max-payne
29 марта 2023
1
ответ
Разработать программу для расчета площадиповерхности и объема шара известного радиуса.
borin50
29 марта 2023
1
ответ
Составьте программу, которая формирует массив из 40 случайных целых чисел от 0 до 20 и вычисляет: сумму чисел, кратных 3На экран выводятся исходные значения и результаты вычислений
nikola
29 марта 2023
1
ответ
Как розставить в комнате 5 стульв, чтобы вдоль каждой стены стояло по 2 стула.
marco
29 марта 2023
1
ответ
1. За яких умов можна на компьютере переглянути відеофільм, послухати музику? 2. Як запустити на виконання обранупрограму?
Задайте свой вопрос

ПОПУЛЯРНОЕ
shaxr, 29 марта 2023
Помогите написать задачу напомогите написать задачу на с + Хулиганы Первый и Второй очень не любят доску почета своей…
splin, 29 марта 2023
Какое из сообщений несет больше информации: а) В результате подбрасывания монеты (орел, решка) выпала решка
goruch, 29 марта 2023
Срочно! Помогите! Запишите строку русских букв…
alexkuzmich, 29 марта 2023
Опишите правила входа в систему ОС Windows
enid-hynde, 29 марта 2023
Дан двумерный массив 4 из 4 строк и 7 столбцой. Найти сумму положительных элементовмассива
max-payne, 29 марта 2023
Разработать программу для расчета площадиповерхности и объема шара известного радиуса
borin50, 29 марта 2023
Составьте программу, которая формирует массив из 40 случайных целых чисел от 0 до 20 и вычисляет: сумму чисел…
nikola, 29 марта 2023
Как розставить в комнате 5 стульв, чтобы вдоль каждой стены стояло по 2 стула?
marco, 29 марта 2023
1. За яких умов можна на компьютере переглянути відеофільм, послухати музику?
27400
Алгебра
14821
Английский язык
14216
Биология
7369
Другой
720
Экономика
18828
Физика
8304
География
15850
Геометрия
5255
Информатика
11818
История
23332
Химия
15992
Литература
73118
Математика
8152
Обществознание
465
Правоведение
46271
Русский язык
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...