ЗАДАНИЯ ДЛЯ СУММАТИВНОГО ОЦЕНИВАНИЯ ЗА 4 ЧЕТВЕРТЬ Раздел «Решение задач в интегрированной среде разработки»

Цель обучения 8.3.1.1 Создавать модели задач в интегрированной среде разработки программ

8.3.3.2 Знать и использовать компоненты интегрированной среды разработки программ (С/С++, Python, Delphi, Lazarus)

8.3.3.1 Использовать операторы выбора и циклов в интегрированной среде разработки программ (С/С++, Python, Delphi, Lazarus)

8.3.2.1 Осуществлять трассировку алгоритма

Критерий Оценивания Обучающийся

• Создает и разрабатывает модель программы

• Использует компоненты интегрированной среды разработки программ

• Использует оператор выбора и оператор цикла в интегрированной среде разработки программ

• Заполняет трассировочную таблицу

Уровень

мыслительных навыков Применение

Время выполнения 20 минут

1. В процессе постановки проблемы, при решении задач в интегрированной среде разработки, какие этапы должны выполняться ?

А)б)в)г)

(4)

2. Основные свойства алгоритма



(1)

3. Основные методы и технологии разработки алгоритмов и программ:

А)б)в)г)д)е)

(4)

4. В чем особенности операторов циклов for, while, do – while ?



(3)

5. Трассировочная таблица–это

(1)

​

Program Alexandra_1;
uses crt;
const n=5;
var
  a:array[1..n] of integer;
  i, sum: integer;
begin
  sum:=0;
  for i:=1 to n do
  begin  
    write('Введите ',i,'-e число ');
    readln(a[i]);
    if a[i]>0 then sum:=sum+a[i];
  end;
  writeln('Сумма положительных элементов ',sum);
end.

Program Alexandra_2;
uses crt;
const n=7;
var
  a:array[1..n] of integer;
  i, num: integer;
begin
  num:=0;
  for i:=1 to n do
  begin  
    write('Введите ',i,'-e число ');
    readln(a[i]);
    if (a[i]>0) AND (a[i] mod 2 = 0) then num:=num+1;
  end;
  writeln('Количество четных положительных элементов ',num);
end.

Program Alexandra_3;
uses crt;
const n=6;
var
  a:array[1..n] of integer;
  i, tum: integer;
begin
  tum:=1;
  for i:=1 to n do
  begin  
    write('Введите ',i,'-e число ');
    readln(a[i]);
    if a[i]>0 then tum:=tum*a[i];
  end;
  writeln('Произведение положительных элементов ',tum);
end.

var

a,i,n,a1:integer;

begin

a1:=30000;

read(n);

for i:=1 to n do begin

read(a);

if (a<a1) and (a div 10 <10) and (a div 10 >1)and (a mod 2 = 0) then a1:=a;

end;

writeln(a1);

end.

var

b,x,c:real;

i,n,a:integer;

begin

x:=0;

b:=0;

read(n);

for i:=1 to n do begin

read(a);

if (a mod 7 = 0) or (a mod 3 = 0) then b:=b+a;

if (a mod 7 =0) or (a mod 3 = 0) then x:=x+1;

end;

c:=b/x;

writeln(c);

end.

var

a,b,x,i,n:integer;

begin

x:=0;

read(n);

for i:=1 to n do begin

read(a);

if (a mod 10 <>1) and (a mod 2 = 1) then x:=x+1;

end;

writeln(x);

end.