15 КиБ * 1024 = 15360 байт, столько же символов
15360 / (40 * 60) = 6.4 ≈ 7 листов
Program ar;
Var a:array [1..3] of array [1..4] of integer;
i, j, min, sum:integer;
begin
for i:=1 to 3 do
for j:=1 to 4 do
read(a[i][j]);
for i:=1 to 3 do
for j:=1 to 4 do
if a[i][j] > 10 then write(a[i][j], ' ');
writeln;
min:=a[2][1];
for j:=1 to 4 do
if a[2][j] < min then min:=a[2][j];
writeln(min);
for i:=1 to 3 do
begin
sum:=0;
for j:=1 to 4 do
sum:=sum + a[i][j];
write(sum, ' ');
end;
end.
Надеюсь все работает.
уфф, сегодня вас много, паскалистов. :D
<span>Индекс последнего отрицательного элемента массива.
Ответ: 5</span>
<span>B1.
Числа:
35, 71</span>
В2.
<span>B3.
Заменим
числа в 5 первых ячейках на среднее и получим в сумме
5+24=120</span>
Х – число в 6 ячейке
(120+Х)/6 = 4
Х = -96
<span>В4.
в ячейке F4
будет формула
=$C6-I$3</span>
<span>С1.
8, 17, 26</span>
Примеры:
1)
Вышел на улицу - неполная
Вася вышел гулять на площадке перед домом в шесть часов вечера - полная
2)
Поставил два за поведение - неполная
Дворник ради шутки поставил два за поведение в дневник мальчика - полная.
Полезная:
В моей комнате лежит циркуль,который ты вчера искал
Неполезная:
У меня в комнате есть циркуль
понятная :(дайте мне перекись водорода) и непонятная :(дайте мне пероксид водорода