35 ! кто с школы интернет урокциклические алгоритмывыбери верный ответ.1. while < условие> do < оператор> 1цикл с неизвестной2цилиндрический цикл3цикл с предусловием4цикл с эпилогом2.сколько раз будет выполнен цикл forn: =1to57do ? 3.дано: fori: =1to9do при последнем выполнении тела цикла i=4.дан алгоритм для робота: алгнач нц 48 раз вправо; закрасить кцкон1если правее робота не встретится препятствий, то, выполнив выше алгоритм, он переместится на 48 клеток вправо и закрасит эти клетки.2если правее робота не встретится препятствий, то, выполнив выше алгоритм, он переместится на n клеток вправо и закрасит эти клетки.3если правее робота не встретится препятствий, то, выполнив выше алгоритм, он переместится на 48 клеток вправо.4если левее робота не встретится препятствий, то, выполнив выше алгоритм, он переместится на 48 клеток влево и закрасит эти клетки.5.дана программа на языке паскаль. заполни пропуски.вывод на экран квадратов чисел от 1 до 52.var? : integer; beginfor i: =1 to ? dowriteln(sqr(? )); readln; end.
Ответы
// PascalABC.NET 3.1, сборка 1198 от 11.03.2016
begin
var n:=5;
var z:=MatrixRandom(n,n,10,99);
for var i:=0 to n-1 do begin
for var j:=0 to n-1 do Print(z[i,j]);
Writeln
end;
var imin:=0;
var jmin:=n-1;
for var i:=1 to n-1 do
if z[i,n-i-1]<z[imin,jmin] then begin
imin:=i; jmin:=n-i-1
end;
Writeln('Zmin=Z[',imin+1,',',jmin+1,']=',z[imin,jmin])
end.
Тестовое решение:
26 62 62 90 76
21 67 69 43 37
18 19 35 88 91
60 91 87 46 27
49 71 16 77 81
Zmin=Z[3,3]=35
Замечание:
В массиве элементы нумеруются от 0 до 4, а при выводе номера индексов указаны для нумерации от 1 до 5 (так привычнее смотрится).
begin
var n:=5;
var z:=MatrixRandom(n,n,10,99);
for var i:=0 to n-1 do begin
for var j:=0 to n-1 do Print(z[i,j]);
Writeln
end;
var imin:=0;
var jmin:=n-1;
for var i:=1 to n-1 do
if z[i,n-i-1]<z[imin,jmin] then begin
imin:=i; jmin:=n-i-1
end;
Writeln('Zmin=Z[',imin+1,',',jmin+1,']=',z[imin,jmin])
end.
Тестовое решение:
26 62 62 90 76
21 67 69 43 37
18 19 35 88 91
60 91 87 46 27
49 71 16 77 81
Zmin=Z[3,3]=35
Замечание:
В массиве элементы нумеруются от 0 до 4, а при выводе номера индексов указаны для нумерации от 1 до 5 (так привычнее смотрится).
const
n = 15;
var
x: array[1..n] of integer;
i, k, t, min: integer;
begin
Randomize;
Writeln('Исходные элементы массива');
min := 1000;
for i := 1 to n do
begin
x[i] := Random(101) - 50;
Write(x[i]:4);
if min > x[i] then begin
min := x[i];
k := i
end
end;
t := x[k]; x[k] := x[1]; x[1] := t;
Writeln;
Writeln('Результирующие элементы массива');
for i := 1 to n do Write(x[i]:4);
Writeln
end.
Исходные элементы массива
-28 -22 -15 3 27 29 34 -29 -49 -37 -19 31 40 -36 4
Результирующие элементы массива
-49 -22 -15 3 27 29 34 -29 -28 -37 -19 31 40 -36 4
Объяснение:
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Формирование виртуального пространства. Перемещение в пространстве.C#
Автор: Ka2ffka141
Сделайте и скиньте таблицу как вы сделаете
Автор: stertumasova29
1 - 3
2 - 56
3 - 8
4 - 1
5 -
1? - х=53
2? - х
3? - i