1)
var X:array[12] of real;
i: integer;
begin
for i:=1 to 12 do
begin
readln(X[i]);
X[i]:=X[i]-23;
end;
for i:=1 to 12 do
writeln(X[i])
end.
2)
var M:array[100] of integer;
i: integer;
begin
for i:=1 to 100 do begin
readln(M[i]);
if(M[i] mod 2=0) then M[i]:=M[i]*M[i]
else M[i]=2*M[i];
end;
for i:=1 to 100 do
writeln(M[i]);
end.
3)
var price:array[20] of real;
i:integer;
minprice:real;
begin
minprice:=10000;
for i:=1 to 20 do
begin
readln(price[i]);
if (price[i]<minprice) then minprice:=price[i];
end;
writeln(minprice)
end.
4)
var M:array[100] of integer;
i, counter: integer;
begin
readln(M[1]);
counter:=0;
for i:=2 to 100 do begin
readln(M[i]);
if ((M[i] mod 2=1) and (M[i-1] mod 2=1)) then inc(counter);
end;
writeln(counter)
end.
Компьютерная программа, позволяющая проводить вычисления с данными,
представленными в виде двухмерных массивов, имитирующих обычные
таблицы.
автоматизация вычислений;
представление результатов вычислений в виде диаграмм;
моделирование, когда исследуется влияние одних параметров на другие
5. Память была использована - ОЗУ или RAM (англ.), т.е. оперативная память, ему необходимо было сохранить реферат на ПЗУ или ROM, т.е. жесткий диск или другой постоянный накопитель.
6. ОЗУ или RAM (англ.) - оперативная память
7. Это энергонезависимая память для сохранения данных.
8. 2Кбайта = 2 * 1024 = 2048байт
2048 < 3072
Первый реферат меньше
PDF формат имеет такие преимущества как:
- Высокая степень сжатия растровых изображений, с низкой потерей качества
- Инкапсулирование (хранение) шрифтов внутри сохраненного файла
- Сохранение размера иходного файла
- Последние два пункта ведут к главному преимуществу - одинаковый внешний вид на любых платформах, в не зависимости от установленого там софта и шрифтов.
- К Марату это не относится, но несомненным преимуществом является електронная подпись документов
10. Вид связи Wireless (безпроводная), по стандарту Wi-Fi.
Преимущество Wi-Fi:
- Как не странно, отсутствие проводов
- Решение проблемы интерфейсов разных устройств (мобильному телефону к примеру никакой кабель подключать для интернета не нужно, Ethernet по просту в него не влезет, а Wifi решает этот вопрос).
- Простота использование и удобное подключение относительно большого кол-ва пользователей.
- Простота развертывания сети (необходимо только подключить кабель интернета в роутер и настроить оный)
Значок обозначает что в данном месте доступны сети по стандарту WiFi
<em>// PascalABC.NET 3.2, сборка 1374 от 10.01.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ArrRandom(ReadInteger('n='),0,1).Println.Sorted.Println
end.
<u>Пример</u>
n= 15
0 0 1 1 0 1 1 1 1 0 0 1 1 0 1
0 0 0 0 0 0 1 1 1 1 1 1 1 1 1
Сургут, например, хотя я не нашла точной логической цепочки