<em>// PascalABC.NET 3.3, сборка 1625 от 17.01.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
function amax(a:array of integer):integer;
begin
Result:=a.Max
end;
begin
var x:=ArrRandom(ReadInteger('n='),-50,50); x.Println;
Writeln('Максимальный элемент равен ',amax(x))
end.
<u>Пример</u>
n= 15
-21 9 27 -46 -17 -21 22 50 -50 -47 -20 43 -23 43 -46
Максимальный элемент равен 50
1 байт = 8 бит
128 бит = 14 байт
1 Кбайт = 8192 бит
1.5 Кбайт = 12288 бит
2048 байт = 2 Кбайт
2 Мбайт = 2048 Кбайт
81920 бит = 10 Кбайт
1.5 Мбайт = 1572864 байт
Не благодари)))
<em>
Реализована формула</em>
<em>
// PascalABC.NET 3.2, сборка 1485 от 15.06.2017</em><em>// Внимание! Если программа не работает, обновите версию!</em>begin
Write('Введите х и у: '); var (x,y):=ReadReal2;
var s:=Power(Cos(Power(Pi*y/3-x,14)),6)+Sin(y*y*y);
Writeln('s=',s)
end.
<u>Пример</u>Введите х и у: 2.175 -1.4
s=-0.335572582839361
Для начала стоит разобраться в том, насколько программирование востребовано в современном мире. Программист - это человек, который не только хорошо разбирается в компьютерах, но и создает новые программы, а также сайты. Фактически это сотрудник, занимающийся IT-технологиями. Программирование - перспективное направление. Получив диплом по соответствующей специальности, можно построить хорошую карьеру. Заработок программиста в среднем составляет 100-150 тысяч рублей. Именно поэтому многие задумываются над поступлением. -
В список подобных вступительных испытаний входит всего 2 предмета. А именно: русский язык; математика. -
прочее-<span>физика; информатика; иностранный язык
</span><span />
Вводим значение а=16.
Далее: "если а- четное, то делим его пополам". У нас 16 - четное, поэтому делим пополам и получаем 8. Это и есть ответ.
<u><em>Ответ:</em></u> 8