1. Информатика
  2. Дано натуральное число n. Вывести

Дано натуральное число n. Вывести на экран все натуральные числа от 1 до n, при делении которых на 5 получается остаток равный 3. (паскаль)

3456801 3456801    3   21.01.2022 04:56    0

Ответы
Мадока2000 Мадока2000  21.01.2022 06:00

var n,i:integer;

begin

read(n);

for i:=1 to n do

 begin

if i mod 5=3 then

 writeln(i);

end;

end.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
kyzmina97 kyzmina97  28.09.2019 19:50
Если кому интересно буду )) пять магов, антуан, бернан, вернье, ганс и далий как-то раз отправились в пеший поход. по пути им встретился сломанный мост, около которого...
marina2002ermol marina2002ermol  28.09.2019 19:50
Взоопарке содержится 10 обезьян, причём одна из них выступает в цирке. обезьяны сидят в двух вольерах, в первом - 8 животных, а во втором - два. посетитель зоопарка...
Tamilla19 Tamilla19  28.09.2019 19:50
Запишите число 23 в 8 разрядном представлений и -23 в 16 разрядном представлений....
nikitoschenko nikitoschenko  09.09.2019 10:50
1. что такое формулиzация zадачи 2.что такое откладка программы? что наzывается тестом...
SashylikS SashylikS  09.09.2019 10:50
(c++) лучший разделить на слова std: : string или char[]...
zadrotovg zadrotovg  09.09.2019 10:50
Информатика 7 класс 1.программа для проведения досуга(4 буквы) … 2. устройство ввода-вывода информации с дисков(8 букв) … 3. программа, позволяющая натренироватся в...
природа45 природа45  27.01.2022 11:12
Спроектируйте структуру таблицы однотабличной базы данных «Магазин кондитерских изделий». Таблица должна содержать не менее восьми полей с различными типами данных....
ЕкатеринкA ЕкатеринкA  27.01.2022 11:09
Дана информация о крупнейших реках Азии. Крупнейшими реками Азии являются: Янцзы (протяженность реки — 6300 км, площадь бассейна — 1807 тыс. км, протекает по территории...
милаха80 милаха80  27.01.2022 10:58
X *4.2.3.py - C:/Users/User/AppData/Loc... File Edit Format Run Options Window Help = fin = open( Input.txt , r ) fout = open( Output.txt , W ) a=int(fin.read(3)) fin.seek...
ЕгорРябцев ЕгорРябцев  27.01.2022 10:54
Вычислите значение переменных для данных команд присваивания...

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