Во что токое переменная? 2. Какие блоки используют для смена костюма ? 3.какие возможностями обладает программа Scratch? 4. Каково назначение блока операторы? 5. Почему блоки раскрашены в разные цвета? 6. Назовите датчик. 7. Какой датчик нужен при создании? 8. Что токой ультразвуковые датчик? 9. Что токое лабиринт? 10. Опеши условия соревнования по кегельренку. 11. Что токое видио запись?
function MaxElem(a: array[,] of integer; i: integer): integer;
var
j, m: integer;
begin
m := a[i, 0];
for j := 1 to length(a, 1) - 1 do
if a[i, j] > m then
m := a[i, j];
MaxElem := m
end;
procedure Input(var a: array[,] of integer);
var
i, j: integer;
begin
Writeln('вводите элементы массива');
for i := 0 to length(a, 0) - 1 do
for j := 0 to length(a, 1) - 1 do
read(a[i, j]);
end;
procedure Output(var a: array of integer);
var
i: integer;
begin
Writeln('полученный массив');
for i := 0 to length(a) - 1 do
write(a[i], ' ');
end;
var
m, n, i: integer;
a: array[,] of integer;
b: array of integer;
begin
read(m, n); // ввод числа строк и столбцов
setlength(a, m, n);
setlength(b, m);
Input(a);
for i := 0 to m - 1 do
b[i] := MaxElem(a, i);
Output(b);
end.
Написано на Free Pascal
Объяснение кода №1;
var s, n: integer; //Объявление переменных
begin //Начало программы
s:=100 //Значение переменной S равняется 100
n:=300 //Значение переменной n равняется 300
while s+n <= 600 do
//Цикл while выполняется до тех пор, пока истинно условие s + n <= 600, т. е. сумма s и n определяет, сколько раз выполнится цикл.
begin
//Следовательно, два действия s := s + 40 и n := n − 20 можно объединить, так как цикл зависит от двух переменных. Таким образом, на каждом повторе (умными словами итерации) добавляется 20.
s:= s+40
n:=n-20
end
//Решим уравнение: 400 + x > 600.
Цикл остановится, когда x будет больше 200. Поскольку каждый раз добавляется по 20, будет 11 повтор.
По итогу, получится на 11-ой итерации: 100 + 40 * 11 = 540.
Объяснение кода №2;
//Объяснения немного короче напишу
var s, n: integer;
begin
s:=500
n:=200
//Цикл while выполняется до тех пор, пока истинно условие s div n >= 2, т. е. целочисленное деление s на n определяет, сколько раз выполнится цикл.
while s div n >= 2 do begin
s:= s+5
n:= n+5
end
//Следовательно, каждый раз к обеим переменным прибавляется по 5. Целочисленное деление s на n будет меньше 2 тогда, когда s примет значение 605, а n — значение 305.
Совет: Если ты вдруг 10 или 11 класс, и не понимаешь данные штуки, можешь не вникать уже в них, поздно. Изучай си, си++ в универе пригодится :)