Планы занятий в рамках самостоятельной работы студентов под руководством преподавателя (СРСП)
Тема 1. Арифметические выражения. Линейные программы.
Форма проведения: тренинг.
Методические рекомендации: Составить блок-схему и написать программу вычисления смешанного арифметического выражения для данных в форматах real (переменные a,b) и integer (остальные переменные).
Варианты заданий:
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Контрольный пример.
Н
арисовать
блок-схему и написать программу вычисления
заданного смешанного арифметического
выражения для данных в форматах REAL
(переменные a,b) и INTEGER (остальные
переменные).
program primer1;
var rez,a,b:real;
c: integer;
begin
writeln(' c __');
writeln(' a + - - \|28');
writeln(' b');
writeln('---------------');
writeln(' 4*b* a + 1');
writeln;
write('a = '); readln(a);
write('b = '); readln(b);
write('c = '); readln(c);
rez:=(a+c/b-sqrt(28))/(4*b*a+1);
writeln('rez = ', rez:10:5);
end.
1осн. [14-37, 77-85],4осн.[14-39].
5доп. [4-6], 10доп.[11-14, 54-56], 11доп.[33-98], 12доп.[13-41, 53-61,65-72]
Тема 2. Условный оператор.
Форма проведения: тренинг.
Методические рекомендации: Вычислить заданное целочисленное выражение для данных a, b в формате INTEGER, используя условный оператор IF. Составить блок-схему алгоритма и написать программу.
Варианты заданий:
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Контрольный пример. Вычислить заданное целочисленное выражение для данных a, b в формате INTEGER, используя условный оператор IF:
program primer2;
var a,b:integer;
x:real;
begin
write('a = '); readln(a);
write('b = '); readln(b);
if (a=b) then x:=-7 else
if (a>b) then x:=a/b-2 else
x:=(sqr(a)*a-3)/a;
writeln('X = ',x:6:2);
end.
1осн. [14-37, 77-85],4осн.[14-39].
5доп. [4-6], 10доп.[11-14, 54-56], 11доп.[33-98], 12доп.[13-41, 53-61,65-72]
Тема 3. Операторы цикла.
Форма проведения: решение задач.
Методические рекомендации: Выполнить задание, используя операторы цикла FOR, WHILE и REPEAT. Составить блок-схему алгоритма и написать программу.
Варианты заданий:
1. Даны два целых числа A и B (A < B). Вывести все целые числа, расположенные между данными числами (включая сами эти числа), в порядке их возрастания, а также количество N этих чисел.
2. Даны два целых числа A и B (A < B). Вывести все целые числа, расположенные между данными числами (не включая сами эти числа), в порядке их убывания, а также количество N этих чисел.
3. Дано вещественное число A и целое число N (> 0). Вывести A в степени N: AN = A·A·...·A (числа A перемножаются N раз).
4. Дано вещественное число A и целое число N (> 0). Вывести все целые степени числа A от 1 до N.
5. Дано вещественное число A и целое число N (> 0). Вывести 1 + A + A2 + A3 + ... + AN.
6. Дано вещественное число A и целое число N (> 0). Вывести 1 – A + A2 – A3 + ... + (–1)NAN.
7. Дано целое число N (> 1). Вывести наименьшее целое K, при котором выполняется неравенство 3K > N, и само значение 3K.
8. Дано целое число N (> 1). Вывести наибольшее целое K, при котором выполняется неравенство 3K < N, и само значение 3K.
Контрольный пример. Составить блок-схему и программу печати всех делителей натурального числа A.
program primer3;
var a,n,c,d:word;
begin { основная программа }
readln( a );
n:=1;
while ( n <= sqrt(a) ) do
begin
c:=a mod n;
d:=a div n;
if c = 0 then
begin
writeln( n );
if n <> d then writeln( d );
end;
inc( n );
end;
end.
1осн. [14-37, 77-85],4осн.[14-39].
5доп. [4-6], 10доп.[11-14, 54-56], 11доп.[33-98], 12доп.[13-41, 53-61,65-72]