Uses crt;
const max=100;
var a: array [1..max] of real;
i,n:integer;
begin
clrscr;
write('Zadajte razmernost massiva');
readln(n);
writeln('Ishodnij massiv:');
for i:=1 to n do
begin
a[i]:=random(100);
write(a[i]:7:2);
end;
writeln;
writeln('Novij massiv:');
for i:=1 to n do
begin
if (i mod 2)<>0 then
a[i]:=sqrt(a[i]);
write(a[i]:7:2);
end;<span>
end.</span>
Оформи таблицу сам. пишу алгоритм, цифры тебе пояснения сколько в каком сосуде воды.
<span>Наполнить сосуд А 5-0
</span><span>Перелить из сосуда А в В 0-5
</span><span>Наполнить сосуд А 5-5
</span>Перелить из сосуда А в В 1-9
<span>Вылить из сосуда б 1-0
</span>Перелить из сосуда А в В 0-1
<span>Наполнить сосуд А 5-1
</span>Перелить из сосуда А в В 0-6
Наполнить сосуд А 5-6
Перелить из сосуда А в В 2-9
<span>Вылить из сосуда б 2-0
</span>
<span>Перелить из сосуда А в В 0-2
</span><span>Наполнить сосуд А 5-2
</span><span>Перелить из сосуда А в В 0-7</span>
24710 = 2*5*7*353
-----------------------------------------------------
N=2 24710 (10cc) = 10000010000110 (2cc)
N=5 24710 (10cc) = 1242320 (5cc)
N=7 24710 (10cc) = 132020 (7cc)
N=14 24710(10cc) = 9010 (14cc)
N= 35 24710 (10cc) = K60 (35cc)
---------------------------------------------
ответ: N1=2 N2=5 N3=7 N4=14
Программа на С:
int main(){
float temp = receiveTemperature();
if(temp > 60){
printf("Пожароопасная ситуация");
}
}
Блок-схема:
<u>(начало)
</u> |
<u>/temp/
</u> |
<u>|temp = receiveTemperature()|
</u> |
<u><temp > 60></u>
| да
+--------------<u>/"Пожароопасная ситуация"/</u>--+
| нет |
+-------------<u>(конец)</u>---------------------------------+
<em>// PascalABC.NET 3.2, сборка 1385 от 14.02.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var n:=ReadInteger('Количество строк в массиве:');
var m:=ReadInteger('Количество столбцов в массиве:');
Writeln('*** Исходный массив [',n,',',m,'] ***');
var a:=MatrRandom(n,m,-99,99);
a.Println(4); Writeln(4*a.ColCount*'-');
for var j:=0 to m-1 do a[1,j]:=5; a.Println(4)
end.
<u>Пример</u>
Количество строк в массиве: 6
Количество столбцов в массиве: 8
*** Исходный массив [6,8] ***
9 -3 -27 -90 43 -54 0 -49
-2 91 -12 -10 -21 19 52 5
26 41 79 98 91 -50 87 -50
-23 -24 -63 17 -59 75 -43 -62
-27 -13 93 2 -58 -43 -22 -90
5 94 90 -26 81 46 5 -12
--------------------------------
9 -3 -27 -90 43 -54 0 -49
5 5 5 5 5 5 5 5
26 41 79 98 91 -50 87 -50
-23 -24 -63 17 -59 75 -43 -62
-27 -13 93 2 -58 -43 -22 -90
5 94 90 -26 81 46 5 -12