Главная Учителю ЕГЭ ГИА  

Основное меню

 
 

Контакты

 
krasakova@bk.ru
 

 
 

Найти: на urok-ikt.narod.ru на Яндексе

Главная / Подготовка к ОГЭ / Составление программ

20.2. Составление программ

1. (КИМ ГИА-2016). Напишите программу, которая в последовательности натуральных чисел определяет минимальное число, оканчивающееся на 4. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 4.

Количество чисел не превышает 1000. Введённые числа не превышают 30 000.

Программа должна вывести одно число – минимальное число, оканчивающееся на 4.

Пример работы программы:

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

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

14
24
144
22
12
0
168
 
Возможное решение:

var n,i,a,min: integer;
begin 
 readln(n);

 min:=30001
 for i:=1 to n do

    begin

      readln(a)
      if (a mod 10 = 4) and (a < min)

           then min:= a;
    end;
 writeln(min)
end.

 
 
2. (КИМ ГИА-2013). Напишите программу, которая в последовательности натуральных чисел определяет сумму всех чисел, кратных 6 и оканчивающихся на 4. Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа не превышают 30 000.

Программа должна вывести одно число: сумму всех чисел, кратных 6 и оканчивающихся на 4.

Пример работы программы:

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

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

14
24
144
22
12
0
168
 
Возможное решение:

var a, s: integer;
begin
 s:= 0;
 readln(a);
 while a<>0 do begin
     if (a mod 6 = 0) and (a mod 10 = 4) then
        s := s + a;
     readln(a); end;
 writeln(s)
end.

 
 
3. (КИМ-2012). Напишите программу, которая в последовательности целых чисел определяет количество чётных чисел, кратных 7. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).

Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести одно число: количество чётных чисел, кратных 7.

Пример работы программы:

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

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

-32
14
17
0
1
 
Возможное решение:

var a, k: integer;
begin
 t:=0;
 readln(a);
 while a<>0 do begin
     if (a mod 2 = 0) and (a mod 7 = 0) then
        k := k + 1;
     readln(a);

     end;
 writeln(k)
end.

 
 
4. Напишите программу, которая в последовательности натуральных чисел определяет минимальное положительное число, кратное 5.
Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, делящееся на 5.
Количество чисел не превышает 1000. Введённые числа не превышают 30 000.
Программа должна вывести одно число – минимальное положительное число, кратное 5.
Пример работы программы:

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

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

4
-5
10
6
25
10
 
Возможное решение:

var n,i,a,min: integer;
begin 
 readln(n);

 min:=30001
 for i:=1 to n do

    begin

      readln(a)
      if (a>0) and (a mod 5 = 0) and (a < min)

           then min:= a;
    end;
 writeln(min)
end.

 
 
4. Напишите программу, которая вычисляет произведение членов последовательности, кратных 5. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность) . Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000.

Программа должна вывести одно число: произведение членов последовательности, кратных 5.

Пример работы программы:

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

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

8
5
-2
0
5
 
 
5. Напишите программу, которая в последовательности целых чисел определяет количество двузначных чисел, кратных 5. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30000.

Программа должна вывести одно число: количество двузначных чисел, кратных 5.

Пример работы программы:

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

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

10
5
120
14
0
1
 
 
6. Напишите программу, которая в последовательности целых чисел определяет количество чисел, кратных 5 или 7. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30000.

Программа должна вывести одно число: количество чисел, кратных 5 или 7.

Пример работы программы:

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

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

-22
25
-14
0
2
 
 
7. Напишите программу, которая в последовательности натуральных чисел находит наименьшее число, кратное 3. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не является членом последовательности). Количество чисел не превышает 1000. Введённые числа не превышают 30000. Гарантируется, что в последовательности есть хотя бы одно число, кратное 3.

Программа должна вывести наименьшее число, кратное 3.

Пример работы программы:

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

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

45
10
9
0
9
 
 
8. Напишите программу, которая в последовательности целых чисел находит среднее арифметическое чисел, кратных 9, или сообщает, что таких чисел нет. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не является членом последовательности). Количество чисел не превышает 100. Введённые числа по модулю не превышают 300.

Программа должна вывести среднее арифметическое чисел, кратных 9, или вывести NO, если таких чисел в последовательности нет.

Пример работы программы:

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

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

9
-30
18
0
13.5
-15
7
0
NO
 
 
 
Скачать PascalABC/
 

Рейтинг@Mail.ru

Дистанционное обучение

начальная школа
5 класс
6 класс
7 класс
8 класс
9 класс
10 класс
11 класс
 

 

Copyright © 2011 - | Красакова О.Н. E-mail: krasakova@bk.ru