9В. Готовимся к контрольной работе

Контрольная работа №4 «Основы программирования»

Вариант 0.

Часть 1. Задания с кратким ответом.

1. Запишите оператор, в результате выполнения которого переменная t увеличит свое значение на два.

2. Определите результаты операций:     а) a := 23 mod 3;     б) х := 7 div 4 + 12 mod 4.

3. Программа решает следующую задачу: «Дано расстояние в сантиметрах. Найти число полных

метров в нем». Что нужно написать в программе вместо пропусков?

Program Metr;

Var r,m : integer;

Begin

  write(‘Введите расстояние в сантиметрах: ’); 

        (r);

  m:=         

  writeln(‘В данной величине ’,m,’ полных метров’);

End.

4. Программа находит значение функции 

Заполните пропуски:

Program Funkt;

Var x,y :        ;

Begin

  write(‘Введите значение х: ’);

  readln(x);

                            

                            

  writeln(‘Значение у равно’,y:6:1);

End.

5. Дан фрагмент программы:

x:=0;

for i:=1 to 5 do

  begin

    x:=x+2*i;

    y:=x/2; 

  end;

а) Укажите переменную, которая является счетчиком цикла.

б) Сколько команд в теле цикла?

в) Сколько раз выполнится тело цикла?

г) Чему будут равны значения переменных x и y в результате выполнения фрагмента?

Часть 2. Задания с развернутым ответом.

6. Написать программу пересчета расстояния из верст в километры (1 верста равняется 1066,8 м).

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

8. Написать программу для вычисления суммы