Инфоурок Информатика СтатьиСтатья на тему "Подготовка к олимпиадам по информатике:Циклы. Часть 2"

Статья на тему "Подготовка к олимпиадам по информатике:Циклы. Часть 2"

Скачать материал

Циклы. Условия задач

 

Задача A. Четные числа

Выведите (через пробел) все четные числа от a до b (включительно).

 

Примеры

 

Входные данные

Выходные данные

1

4

2 4

 

2

6

2 4 6

 

2

5

2 4

 

 

Задача B. Остаток

Вводятся 4 числа: a, b, c и d.

Выведите все числа на отрезке от a до b, дающие остаток c при делении на d.

 

Примеры

 

Входные данные

Выходные данные

1

4

1

2

1 3

1

5

0

4

4

 

 

Задача C. Квадраты

Выведите все числа на отрезке от a до b, являющиеся полными квадратами.

 

Примеры

 

Входные данные

Выходные данные

1

5

1 4

2

9

4 9

 

 

Задача H. Делители числа

Выведите все натуральные делители числа x в порядке возрастания (включая 1 и само число).

 

Примеры

 

Входные данные

Выходные данные

6

1 2 3 6

5

1 5

 

Задача I. Количество делителей

Подсчитайте количество натуральных делителей числа x (включая 1 и само число; x <= 30000).

 

Примеры

 

Входные данные

Выходные данные

6

4

5

2

 

Задача J. Сумма ста

Вычислите сумму данных 100 натуральных чисел. Вводятся 100 чисел, сумму которых необходимо посчитать.

 

Задача K. Сумма чисел

Вычислите сумму данных N натуральных чисел. Вводится число N, а затем N чисел, сумму которых необходимо вычислить.

 

Примеры

 

Входные данные

Выходные данные

3

1

2

1

4

 

2

5

2

7

 

 

Задача M. Нули

Вводится число N, а затем N чисел. Подсчитайте, сколько среди данных N чисел нулей.

 

Примеры

 

Входные данные

Выходные данные

3

2

0

5

1

 

4

2

0

5

0

2

 

 

Задача N. Подсчет чисел

Подсчитайте, сколько среди данных N чисел нулей, положительных чисел, отрицательных чисел. Вводится число N, а затем N чисел. Необходимо вывести сначала число нулей, затем число положительных и отрицательных чисел.

 

Примеры

 

Входные данные

Выходные данные

3

2

0

5

1 2 0

 

4

2

0

5

-3

1 2 1

 

 

Задача O. Ноль или не ноль

Проверьте, есть ли среди данных N чисел нули. Вводится число N, а затем N чисел. Выведите YES, если среди введенных чисел есть хотя бы один нуль, или NO в противном случае.

 

Примеры

 

Входные данные

Выходные данные

3

2

0

5

YES

4

1

2

3

4

NO

 

 

Задача P. Уравнение по возрастанию

Вводятся 4 числа: a, b, c и d.

Найдите все целые решения уравнения ax3 + bx2 + cx + d = 0 на отрезке [0,1000] и выведите их в порядке возрастания. 

 

Примеры

 

Входные данные

Выходные данные

-1

1

-1

1

1

1

1

1

1

 

 

Задача Q. Уравнение по убыванию

Вводятся 4 числа: a, b, c и d.

Найдите все целые решения уравнения ax3 + bx2 + cx + d = 0 на отрезке [0,1000] и выведите их в порядке убывания.

 

Примеры

 

Входные данные

Выходные данные

1

-2

1

0

1 0

1

1

1

1

 

 

Задача R. Количество решений

Вводятся 5 чисел: a, b, c, d и e.

Найдите все целые решения уравнения ( ax3 + bx2 + cx + d ) / ( x - e ) = 0 на отрезке [0,1000] и выведите их количество.

 

Примеры

 

Входные данные

Выходные данные

1

-2

1

0

1

1

1

1

1

1

1

0

 

Задача S. ГНЧЭ-1

"ГНЧЭ-1"  – сложное электронное устройство, выдающее каждую секунду очередное число последовательности 1, 2, 2, 3, 3, 3, 4, 4, 4, 4, 5... Ввиду дороговизны электронных комплектующих вам поручено разработать эмулятор для этого устройства.

Формат входного файла

Дано количество секунд (от 1 до 1000000), которые работает генератор после включения.

Формат выходного файла

Результат работы генератора

 

Примеры

 

Ввод

Вывод

2

1 2

5

1 2 2 3 3

 


 

Задача A. Четные числа

var a,b,i:longint;

begin

  read(a,b);

  for i:=a to b do

    if i mod 2=0 then write(i,' ');

end.

 

Задача B. Остаток

var a,b,c,d,i:longint;

begin

  read(a,b,c,d);

  for i:=a to b do

    if i mod d=c then write(i,' ');

end.

 

Задача C. Квадраты

var a,b,i:longint;

begin

  read(a,b);

  for i:=a to b do

    if sqrt(i)=int(sqrt(i)) then write(i,' ');

end.

 

Задача H. Делители числа

var x,i:longint;

begin

  read(x);

  for i:=1 to x do

    if x mod i=0 then write(i,' ');

end.

 

Задача I. Количество делителей

var x,i,k:longint;

begin

  read(x);

  for i:=1 to x do

    if x mod i=0 then k:=k+1;

  write(k);

end.

 

Задача J. Сумма ста

var i,a,s:longint;

begin

  for i:=1 to 100 do

    begin

      read(a);

      s:=s+a;

    end;

  write(s);

end.

 

Задача K. Сумма чисел

var i,a,s,n:longint;

begin

  read(n);

  for i:=1 to n do

    begin

      read(a);

      s:=s+a;

    end;

  write(s);

end.

 

Задача M. Нули

var i,a,k,n:longint;

begin

  read(n);

  for i:=1 to n do

    begin

      read(a);

      if a=0 then k:=k+1;

    end;

  write(k);

end.

 

Задача N. Подсчет чисел

var i,a,kn,kp,ko,n:longint;

begin

  read(n);

  for i:=1 to n do

    begin

      read(a);

      if a=0 then kn:=kn+1

      else if a>0 then kp:=kp+1

      else ko:=ko+1;

    end;

  write(kn,' ',kp,' ',ko);

end.

 

Задача O. Ноль или не ноль

var i,a,k,n:longint;

  b:boolean;

begin

  read(n);

  b:=false;

  for i:=1 to n do

    begin

      read(a);

      if a=0 then b:=true;

    end;

  if b then write('YES')

  else write('NO');

end.

 

Задача P. Уравнение по возрастанию

var a,b,c,d,x:longint;

begin

  read(a,b,c,d);

  for x:=0 to 1000 do

    if a*x*x*x+b*sqr(x)+c*x+d=0 then

      write(x,' ');

end.

 

Задача Q. Уравнение по убыванию

var a,b,c,d,x:longint;

begin

  read(a,b,c,d);

  for x:=1000 downto 0 do

    if a*x*x*x+b*sqr(x)+c*x+d=0 then

      write(x,' ');

end.

 

Задача R. Количество решений

var a,b,c,d,x,e,k:longint;

begin

  read(a,b,c,d,e);

  for x:=0 to 1000 do

    if (a*x*x*x+b*sqr(x)+c*x+d=0) and (x<>e) then

      k:=k+1;

  write(k);

end.

 

Задача S. ГНЧЭ-1

var n,i,l,k:longint;

begin

  read(n);

  i:=1;

  l:=0;

  for k:=1 to n do

    begin

     l:=l+1;

     write(i,' ');

     if i=l then begin i:=i+1; l:=0; end;

    end;

end.

 

 

Просмотрено: 0%
Просмотрено: 0%
Скачать материал
Скачать материал "Статья на тему "Подготовка к олимпиадам по информатике:Циклы. Часть 2""

Методические разработки к Вашему уроку:

Получите новую специальность за 2 месяца

Художественный руководитель

Получите профессию

Экскурсовод (гид)

за 6 месяцев

Пройти курс

Рабочие листы
к вашим урокам

Скачать

Скачать материал

Найдите материал к любому уроку, указав свой предмет (категорию), класс, учебник и тему:

6 610 791 материал в базе

Скачать материал

Другие материалы

Вам будут интересны эти курсы:

Оставьте свой комментарий

Авторизуйтесь, чтобы задавать вопросы.

  • Скачать материал
    • 31.05.2016 4178
    • DOCX 16.6 кбайт
    • Оцените материал:
  • Настоящий материал опубликован пользователем Умархужаев Азизхан Азамханович. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт

    Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.

    Удалить материал
  • Автор материала

    • На сайте: 7 лет и 9 месяцев
    • Подписчики: 0
    • Всего просмотров: 28698
    • Всего материалов: 5

Ваша скидка на курсы

40%
Скидка для нового слушателя. Войдите на сайт, чтобы применить скидку к любому курсу
Курсы со скидкой

Курс профессиональной переподготовки

Менеджер по туризму

Менеджер по туризму

500/1000 ч.

Подать заявку О курсе

Курс повышения квалификации

Особенности подготовки к сдаче ОГЭ по информатике и ИКТ в условиях реализации ФГОС ООО

36 ч. — 180 ч.

от 1700 руб. от 850 руб.
Подать заявку О курсе
  • Сейчас обучается 103 человека из 39 регионов

Курс профессиональной переподготовки

Информатика: теория и методика преподавания в образовательной организации

Учитель информатики

300/600 ч.

от 7900 руб. от 3950 руб.
Подать заявку О курсе
  • Сейчас обучается 485 человек из 71 региона

Курс повышения квалификации

Методика преподавания информатики в начальных классах

72 ч. — 180 ч.

от 2200 руб. от 1100 руб.
Подать заявку О курсе

Мини-курс

Цифровые валюты и правовое регулирование

4 ч.

780 руб. 390 руб.
Подать заявку О курсе

Мини-курс

GR-технологии и взаимодействие с СМИ

2 ч.

780 руб. 390 руб.
Подать заявку О курсе

Мини-курс

Музыкальная журналистика: создание и продвижение контента

10 ч.

1180 руб. 590 руб.
Подать заявку О курсе
Сейчас в эфире

Управление сотрудниками: делегирование полномочий и наделение обязанностями

Перейти к трансляции