В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Кндр15
Кндр15
25.04.2022 11:08 •  Информатика

Ребят есть 1 час Они миновали деревню и теперь неслись по залитым лунным светом полям. Живые изгороди, отделяющие одно поле от другого, не препятствовали движению великана. Он легко через них перешагивал. Когда на его пути появилась длинная река, он и через неё перешагнул. Они промчались над полями, живыми изгородями и реками, и вдруг в голову Софи закралась страшная мысль. Она сказала себе, что великан быстро бежит из-за того, что сильно проголодался и хочет поскорее добраться до дома и съесть её на завтрак. Напишите программу, которая определит, куда ступает Великан. Формат ввода Вводятся четыре числа, каждое с новой строки: место начала бега; место окончания длина шага; дополнительное число. Формат вывода В одну строку через пробел записать все числа из указанного диапазона, включая начальное и конечное значения, с указанным шагом. Если среди чисел, подлежащих выводу, встретятся числа, у которых такая же последняя цифра, как и у дополнительного числа, то дальше ничего выводить не надо. Врезались в изгородь. Пример 1 Ввод Вывод 1 49 6 144 1 7 13 19 25 31 37 43 49 Пример 2 Ввод Вывод 38 6 4 66 38 34 30

Показать ответ
Ответ:
S1nneR67
S1nneR67
20.10.2021 14:11
Var
  a:array[1..10000] of integer;
  i, n, first, last:integer;
  fl: boolean;
begin
  Read(n);
  For i:= 1  to n do
    Read(a[i]);fl:=false;
  For i:= 1 to n do
    if (a[i] mod 5 = 0) then
      if (fl = false) then begin
                               fl:= true;
                               first := i;
                               last:= i;
                           end
                           else
                               last := i;
   Writeln('Первый -> ', first);
   Writeln('Последный -> ', last);
       
end.
0,0(0 оценок)
Ответ:
htntjtjt
htntjtjt
06.03.2022 15:37
1) Информационный ресурс-это данные в любом виде для получения достоверной информации. Это может файл, фотография, какое-то видео,отдельные массивы документов в информационных системах и так далее.
2) Информационные ресурсы делятся на три вида-государственные(национальные) ресурсы, персональные информационные ресурсы, информационные ресурсы предприятий.
3) МSNBС-представляет новости СШA, АBС Nеws-представляет новости со всего мира на английском языке, Wikiрedia-сетевая энциклопедия на разных языках со всего мира, электронные книги, и многое другое
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота