Шпаргалка
1. Var – описание переменных
2. Integer, real Типы переменных
3. Begin ….. end программные скобки, так же как в математике (…)
4. После каждой команды ставится знак; (точка с запятой), в конце программы ставится. точка
5. Read; read(..); readln(); Операторы ввода
6. Write(…); Write(…,‘…’); wrireln(…); writeln(‘…’,…,’ …’); Операторы вывода значений переменных без комментариев, с комментариями, без перехода на новую строку, с переходом на новую строку
7. Математические функции для работы с целочисленными переменными:
Div Выделяет целую часть от деления a от b a div b
Mod Определяет остаток от деления a от b a mod b
Проверяем теоретические знания:
Разминка
Для чего предназначен оператор Readln (a)?
а) для ввода данных с клавиатуры;
б) для ввода символьных данных;
в) для печати результатов на принтере;
г) для вывода на экран.
2. Определите результат работы программы:
Writeln (‘5 + 5 =’, 5 + 5)
а) 10 = 10; б) 5 + 5 = 10;
в) 20; г) 5+ 5 = 5 + 5.
Скольких команд вывода достаточно для печати на экране твоей фамилии, имени и отчества?
а) Трех; б) Двух;
в) Одной; г) Четырех.
Для чего предназначен оператор Writeln?
а) для ввода данных с клавиатуры;
б) для ввода числовых данных;
в) для печати результатов на принтере;
г) для вывода на экран.
Что вычисляет функция MOD?
а) Остаток от деления;
б) Модуль числа;
в) Квадратный корень;
г) Определяет знак числа.
Задание 1
Дана программа. Ошибки допущены в строках:
Program z1;
Begin
Write(‘Сколько тебе лет?’);
Read(a);
Write(‘Здравствуйте, твой возраст’,,’лет’;);
End.
а) После слова begin пропущен знак;
б) Пропущена строка var с описанием переменной а
в) В 5-ой строке между запятыми отсутствует имя переменной a
Задание 2
Дана программа. Укажите верное описание переменной S:
Program z2;
Var S:…;
Begin
Write(‘Введите пароль, состоящий из трех букв и трех цифр’);
Read(S);
Write(S,‘- хороший пароль’);
End.
а) Тип real
б) Тип integer
в) Тип string
Задание 3
Дана программа к задаче. Составьте программу, которая вычисляет по введенной стороне квадрата a его периметр P (P = 4∙a). Укажите недочеты, ошибки в программе из-за которых она не будет выполняться:
Program z3;
Var a: integer;
Begin
Write(‘Введите значение стороны квадрата’);
Read(a);
P:=4*a;
Write(‘Периметр квадрата равен ’);
End.
а) Оператор вывода Write необходимо изменить на Writeln
б) В строке var дописать код, описывающий тип переменной p
в) В 7-ой строке не указано имя переменной для вывода
г) В 6-ой строке знак * заменить на знак умножения
Задание 4
Дана программа к задаче. Составьте программу, которая вычисляет среднее арифметическое двух чисел a и b.. Укажите недочеты, ошибки в программе из-за которых она не будет выполняться:
Program z4;
Var a,b,c: integer;
Begin
Writeln(‘Введите значение чисел a и b’);
Read(a,b);
c:=(a+b):2;
Write(‘Среднее арифметическое ’,c);
End.
а) В 5-ой строке две переменные введены через запятую
б) В 6-ой строке знак деления не соответствует правилам написания кода
в) Во 2-ой строке неверно определены типы переменных a,b,c
г) Во 2-ой строке неверно определен тип переменной c
Задание 5
Составлена программа к следующей задаче: дано число, увеличить его на 5. Расставьте номера (буквы) команд в правильном порядке.
А) write ('Через 5 лет ваш возраст будет равен, vozrast,'лет');
Б) end.
В) readln (vozrast);
Г) begin
Д) vozrast:= vozrast+5;
Е) write ('Введите ваш возраст:');
Ж) var vozrast: real;
Задание 6
1. Что выведет на экран оператор write('3+2*3'); и оператор writeln(3+2*3);? Почему ответы будут разными?
Задание 7
Какое значение будет иметь переменная х после выполнения следующих строк программы:
x:=2;
y:=x+1;
x:=y*x;
y:=y+x;
x:=x – y;
а) -1; б) -4; в) -3: г) 5; д) 3.
Задание 8
Составлена программа к следующей задаче: даны два числа a и b, первое число нужно уменьшить в два раза, а второе увеличить на 30. Расставьте номера (буквы) команд в правильном порядке.
А) write ('Результат', a,' и ', b);
Б) a:= a/2;
В) write ('Введите два числа:');
Г) end.
Д) begin
Е) readln (a,b);
Ж) b:=b+30;
З) var a, b: real;
Задание 9
Какое значение будет иметь переменная х после выполнения следующих строк программы:
x:=2;
y:=x+1;
x:=y*x;
y:=y+x;
x:=x – y;
а) -1; б) -4; в) -3: г) 5; д) 3.
Задание 10
Исправьте ошибки в программе, которая вычисляет значение у, по формуле:
.
Program prim1;
Var x,y: real
Begin
write (‘Введите x =’);
y:=(5-abc(x))/x*x+2;
write('y=',y:3:5);
readln;
End.
Задание 11
Исправьте ошибки в программе, которая вычисляет значение у, по формуле:
.
Program prim2;
Var a,b: real;
Begin
write (‘Введите b =’)
readln(a);
a:=b-2/(b+sqrt(5));
readln;
End.
Задание 12
Какое число будет выведено на экран:
Writeln (32 div 5)?
а) 32; б) 2; в) 6;
Задание 13
Определите результат работы программы:
a:= - 6; b:= - 5; a:= a + 2 * b; b:= a; Writeln (a,b).
а) 0, - 16; б) – 16, 0;
в) – 16, - 16; г) – 6, - 5.
Задание 14
Чему равно значение функции 12 MOD 4?
а) 12; б) 4; в) 3; г) 0.
Задание 15
Какими двумя действиями можно получить цифры заданного двузначного числа Х?
а) X div 2; X mod 2;
б ) X div 10; X mod 10;
в) (X div 10) mod 10; (X mod 100) div 10;
г) X div 100; X mod 100.
Задание 16
Какое число будет выведено на экран:
Writeln (50 mod 5)?
а) 50; б) 0; в) 10;
Задание 17
Определите результат работы программы:
a:= - 5; b:= - 5; a:= a + 2 * b; b:= a; Writeln (a,b).
а) - 6, - 15; б) – 15, 0;
в) – 6, - 6; г) – 15, - 15.
Задание 18