Главная
Популярная публикация
Научная публикация
Случайная публикация
Обратная связь
ТОР 5 статей:
Методические подходы к анализу финансового состояния предприятия
Проблема периодизации русской литературы ХХ века. Краткая характеристика второй половины ХХ века
Ценовые и неценовые факторы
Характеристика шлифовальных кругов и ее маркировка
Служебные части речи. Предлог. Союз. Частицы
КАТЕГОРИИ:
|
Расчеты в двумерных массивах
sqr(A[i,j])<16 and A[i,j]>0
| y cy9kb3ducmV2LnhtbEyPwU7DMAyG70i8Q2QkbixpQRsrTSc0hFQ4weCwY9Z6bbXGiZqsLW+PEQc4 2v+n35/zzWx7MeIQOkcakoUCgVS5uqNGw+fH8809iBAN1aZ3hBq+MMCmuLzITVa7id5x3MVGcAmF zGhoY/SZlKFq0ZqwcB6Js6MbrIk8Do2sBzNxue1lqtRSWtMRX2iNx22L1Wl3thqm8Zg2qd++lG+v q/2pdL68ffJaX1/Njw8gIs7xD4YffVaHgp0O7kx1EL2GVK3WjHKwTEAw8Ls4aLhTCcgil/8/KL4B AAD//wMAUEsBAi0AFAAGAAgAAAAhALaDOJL+AAAA4QEAABMAAAAAAAAAAAAAAAAAAAAAAFtDb250 ZW50X1R5cGVzXS54bWxQSwECLQAUAAYACAAAACEAOP0h/9YAAACUAQAACwAAAAAAAAAAAAAAAAAv AQAAX3JlbHMvLnJlbHNQSwECLQAUAAYACAAAACEAfyKCJfoBAAD+AwAADgAAAAAAAAAAAAAAAAAu AgAAZHJzL2Uyb0RvYy54bWxQSwECLQAUAAYACAAAACEAW6m86N0AAAAJAQAADwAAAAAAAAAAAAAA AABUBAAAZHJzL2Rvd25yZXYueG1sUEsFBgAAAAAEAAQA8wAAAF4FAAAAAA== " strokecolor="black [3200]" strokeweight="2pt">
program Z12;
var A:array[1..4,1..3] of integer;
i,j: byte;
P:real;
begin
cls;
writeLn(‘вводим элементы массива A:');
for i:=1 to 4 do
for j:=1 to 3 do
begin
write('A[',i,',',j,']=');
readLn(A[i,j]);
end;
P:=1;
for i:=1 to 4 do
for j:=1 to 3 do
if (sqr(A[i,j])<16) and (A[i,j]>0) then
begin
p:=p*A[i,j];
end;
writeLn('произведение элементов квадрат которых < 16 ', p);
end.
Не нашли, что искали? Воспользуйтесь поиском:
|