Задание 1С. Ввести: 1. в физически крайние угловые ячейки рабочей таблицы 1) название факультета, 2) название специальности, 3) номер группы, 4) фамилию, имя и отчество соответственно (физически крайние ячейки - A1, A65536, IV1, IV65536);
2. в ячейку AB10001, текст “Пример 1”, расположив его по диагонали;
3. в предпоследнюю ячейку первого столбца число 0,25, так чтобы оно отобразилось в ячейке как ¼;
4. в последнюю ячейку второй строки рабочей таблицы название учебного заведения, расположив каждое слово в новой строке данной ячейки;
5. Задайте формат ячейки С6 так, чтобы числа из отрезка [-10;10] отображались в ней зеленым, из интервала (10; 500] - красным, а остальные – синим цветом. Для каждого случая выбрать свой фон (используйте Условный формат - Меню Формат/Условное Форматирование).
a=8
Объяснение:
идём по шагам:
1 Шаг a=5 b=7
2 Шаг проверяем b<10 или нет. Да меньше. Идём по стрелке ДА
3 Шаг проверяем a<= b у нас это 5<=7 Да меньше. Идём по стрелке ДА
4 Шаг увеличиваем а и b на единицу, становится a=5+1=6 b=7+1=8 возвращаемся по стрелке к шагу 2
5 Шаг проверяем 8<10 или нет. Да меньше. Идём по стрелке ДА
6 Шаг проверяем 6<=8 Да меньше. Идём по стрелке ДА
7 Шаг увеличиваем а и b на единицу, становится a=6+1=7 b=8+1=9 возвращаемся по стрелке к шагу 2
8 Шаг проверяем 9<10 или нет. Да меньше. Идём по стрелке ДА
9 Шаг проверяем 7<=9 Да меньше. Идём по стрелке ДА
10 Шаг увеличиваем а и b на единицу, становится a=7+1=8 b=9+1=10 возвращаемся по стрелке к шагу 2
11 Шаг проверяем 10<10 или нет. Нет. Идём по стрелке Нет. Выход из алгоритма. На этом этапе a=8
function
Transpose(a: array[,] of integer): array[,] of integer;
//Поворот на 90гр по часовой стрелке
begin
var m := Length(a, 0);
var n := Length(a, 1);
Result := new integer[n, m];
for var i := 0 to n-1 do begin
for var j := 0 to m-1 do
Result[i, j] := a[m-1-j, i];
end;
end;
begin
var n := ReadInteger('Введите n:');
//Заполнение матрицы NxN сл. числами и вывод на экран
var a :=MatrixRandom(n, n);
for var i:=0 to n-1 do begin
for var j:=0 to n-1 do
Print(a[i,j]);
println;
end;
println;
Println('поворот влево на 90 гр');
var b := Transpose(a);
b:=Transpose(b);
b:=Transpose(b);
for var i:=0 to n-1 do begin
for var j:=0 to n-1 do
Print(b[i,j]);
println;
end;
println;
Println('поворот вправо на 90гр');
b := Transpose(a);
for var i:=0 to n-1 do begin
for var j:=0 to n-1 do
Print(b[i,j]);
println;
end;
println;
Println('поворот на 180 гр');
b := Transpose(a);
b := Transpose(b);
for var i:=0 to n-1 do begin
for var j:=0 to n-1 do
Print(b[i,j]);
println;
end;
end.