Цитата дня.

Л.Н. Толстой. "Часто слышишь, что молодежь говорит: я не хочу жить чужим умом, я сам обдумаю. Зачем же тебе обдумывать обдуманное? Бери готовое и иди дальше. В этом сила человечества."

понедельник, 12 октября 2026 г.

10 класс. Тестовая работа 12.10.2026 (14.10.2026)

 Тест 1

Тест 2

1.     Что такое массив? 

2.     Как обратиться к 3-му элементу массива? 

3.     Как заполнить массив случайными числами? 

Проблемный вопрос: 

У нас есть 24 оценки за контрольную.

Как быстро найти средний балл класса

Как найти ученика, который получил «10»?


среда, 7 октября 2026 г.

Задача 3 стр. 36

 Задача 3 , стр. 36

var k1: array [1..99] of integer;
k2: array [1..99] of integer;
var n1,n2: integer;
s1,s2,min :integer;
begin
  write('Введите количество удаленных игроков из двух команд: ');
  read(n1,n2);
  min:=2;
  for var i:= 1 to n1 do  s1:=s1+min;
    for var i:= 1 to n2 do  s2:=s2+min;
if s1>s2 then writeln('первая команда провела на поле больше времени =',s1) 
else writeln('вторая команда провела на поле больше времени =',s2) 
end.

Задача 3, стр 36

var k1: array [1..99] of integer;
k2: array [1..99] of integer;
var n1,n2: integer;
s1,s2,min :integer;
begin
  write('Введите количество удаленных игроков из двух команд: ');
  read(n1,n2);
    for var i:= 1 to n1 do 
  begin
  write('Введите время удаленного игрока  первой колманды');
  readln(k1[i]);
  s1:=s1+k1[i];
  end;
  for var i:= 1 to n2 do
  begin
  write('Введите время удаленного игрока  второй команды');
  readln(k2[i]);
  s2:=s2+k2[i];
  end;
  
if s1>s2 then writeln('первая команда провела на поле больше времени =',s1) 
else writeln('вторая команда провела на поле больше времени =',s2) 
end.

понедельник, 5 октября 2026 г.

№ 6

 Задача 6*var B:array [1..100] of integer;
x,n:integer;
begin
writeln('введите кол-во учащихся в классе'); Readln (N);
writeln('введите рост учащихся');
for var i:=1 to n do
begin
write('учащийся номер ', i,':');
readln (B[i]);
end;
end.

Задача 7*
var T:array [1..100] of real;
a,b, n:integer;
begin
writeln('введите кол-во дней'); Readln (N);
writeln('введите интервал a и b');
readln(a,b);
for var i:=1 to n do
begin
T[i]:=random(a,b)/100;
writeln(i,'декабря температура была =', T[i]);
end;
end.