1)Начало
2)Сравни первое и второе числа;если первое меньше второго,то поменяй их местами.
3)Сравни второе и третьего числа;если второе меньше третьего ,то поменяй их местами.
4)Если теперь три числа расположены в порядке убывания ,то исполни пункт 5) этого алгоритма; иначе вернись. к пункту 2).
<span>5)Конец</span>

0 0

4 года назад

Найти частное от деления максимального на минимальный элемент массива Р(12). Решите через паскаль , пожалуйста , срочно !!!

Lubikys [100]

Var p: array[1..12] of integer;
begin
var min: integer;
var max: integer;

randomize;

for var i := 1 to 12 do p[i] := random(100);

min := p[1];
max := p[1];
for var i:= 1 to 12 do if p[i] < min then min := p[i];
for var i:= 1 to 12 do if p[i] > max then max := p[i];

writeln(max/min);
end.

0 0

3 года назад

Для чего человеку нужны линейка транспортир термометр барометр компас телескоп микроскоп Какие еще приборы и приспособления вы з

эмилия саркисян

Линейка - чтобы измерять расстояние, чаще всего на бумаге.
транспортир - чтобы определять угол.
термометр - чтобы определять температуру.
компас - чтобы определять местоположение по стрелке на север.
телескоп - чтобы наблюдать за звездами.
микроскоп - чтобы изучать клетки организмов.
вольтметр, амперметр, градусник.

0 0

1 год назад

Помогите пожалуйста сор по информатике 5 класс 3 четверть ​

Помогите пожалуйста сор по информатике 5 класс 3 четверть