Контрольная работа для 9 класса: "Модели и моделирование + Паскаль"
материал по информатике и икт (9 класс)

Контрольная работа для 9 класса «Моделирование и формализация»

Вариант 1

            Задание 1 – 2.

Задание 3 – 4.

На рисунке – схема дорог, связывающих города A, B, C, D, E, F, G и H. По каждой дороге можно двигаться только в одном направлении, указанном стрелкой. Сколько существует различных путей из города A в город H?

           Задание 5.

Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, , оканчивающихся на 7 и кратных 3. Программа получает на вход натуральные числа, количество введѐнных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введѐнные числа не превышают 30000. Программа должна вывести одно число: количество натуральных чисел, , оканчивающихся на 7 и кратных 3.

          Задание 6.

Написана программа, которая в последовательности натуральных чисел определяет количество чисел, оканчивающихся на 8. Программа получает на вход количество чисел в последовательности, а затем сами числа. Программа должна вывести одно число: количество чисел, оканчивающихся на 8. В программе присутсуют ошибки.

var a,b,c,d: integer;

begin

    readln (a);

    b:=1;

    for c:=1 to a do

       begin

         readln (d);

         if ( d div 10 =8) then b:=b+d;

      end;

    writeln (b);

end.

Контрольная работа для 9 класса «Моделирование и формализация»

Вариант 2

Задание1 –2.

Задание 3 –4.

Задание 5.

Напишите программу, которая в последовательности натуральных чисел определяет сумму всех чисел, кратных 6 и оканчивающихся на 8. Программа получает на вход количество чисел в последовательности, а затем сами числа. Количество чисел не превышает 100. Введѐнные числа не превышают 300. Программа должна вывести одно число: сумму всех чисел, кратных 6 оканчивающихся на 8.

Задание 6.

Напишите программу, которая в последовательности натуральных чисел определяет

максимальное число, кратное 4. Программа получает на вход натуральные числа, количество

введѐнных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак

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

var a,b: integer;

   begin

      b:=0;

      readln (a);

        while a<>1 do

           begin

              if ( a mod 10 =4) then b:=a;

              readln (a);

           end;

      writeln (b);

    end.