Запиши верный ответ, если дан алгоритм: a1:=9/(17x) a2:=a1/x a3:=a2/x a4:=a3/x y:=a1+a4 Какое значение получит переменная y после выполнения алгоритма? x:=4 y:=4∗x y:=y+3 y:=y∗x y:=y+4 y:=y∗x y:=y+5 Из ряда чисел 6, 12, 21, 28 выпиши те, которые удовлетворяют условию.
Выполни действие и запиши верный ответ. 18mod5=
Запиши верный ответ. 27div8
Дан алгоритм для Робота:
алг нач нц 10 раз вправо; закрасить кц кон
Если правее Робота не встретится препятствий, то, выполнив приведённый выше алгоритм, он переместится на n клеток вправо и закрасит эти клетки. Если правее Робота не встретится препятствий, то, выполнив приведённый выше алгоритм, он переместится на 10 клеток вправо. Если левее Робота не встретится препятствий, то, выполнив приведённый выше алгоритм, он переместится на 10 клеток влево и закрасит эти клетки. Если правее Робота не встретится препятствий, то, выполнив приведённый выше алгоритм, он переместится на 10 клеток вправо и закрасит эти клетки.
Задача №1 var a:array[1..4, 1..5] of integer; i,j,k:integer; begin writeln('Заполните матрицу'); for i:=1 to 4 do for j:=1 to 5 do begin read(a[i,j]); if (a[i,j] mod 3=0) and (a[i,j]>20) then k:=k+a[i,j]; end; writeln('Сумма элементов кратных 3-м и > 20 = ',k); end.
Задача №2 var a:array[1..5, 1..5] of integer; i,j,k:integer; begin writeln('Заполните матрицу'); for i:=1 to 5 do for j:=1 to 5 do begin read(a[i,j]); if i=j then k:=k+a[i,j]; end; writeln('Сумма элементов главной диагонали = ',k); end.
Розы - 38 млн. , пионы - 3 млн. , розы AND пионы - 4 млн. , розы OR пионы - 2 млн. , -розы пионы 4 млн.
Человек-
чтение газеты человеком
строительство дома людьми
Общение с друзьями
Хождение в ресторан
Игра в волейбол
Животный мир-
принятие определённой позы собакой при приближении соперника
общение дельфинов между собой
виляние хвостом у собак
Беганье за палкой
Игра волчат
Растительный мир-
Опадение листвы
рост побегов
сезонные изменения в природе
Начало дождя
Рост дерева
Технические системы-
вождение автомобиля
Деланье уроков
гулянка
Стройка самолета
Готовка еды в массовом производстве
var a:array[1..4, 1..5] of integer;
i,j,k:integer;
begin
writeln('Заполните матрицу');
for i:=1 to 4 do
for j:=1 to 5 do begin
read(a[i,j]);
if (a[i,j] mod 3=0) and (a[i,j]>20) then k:=k+a[i,j];
end;
writeln('Сумма элементов кратных 3-м и > 20 = ',k);
end.
Задача №2
var a:array[1..5, 1..5] of integer;
i,j,k:integer;
begin
writeln('Заполните матрицу');
for i:=1 to 5 do
for j:=1 to 5 do begin
read(a[i,j]);
if i=j then k:=k+a[i,j];
end;
writeln('Сумма элементов главной диагонали = ',k);
end.