Помогите написать программу на языке паскаль

Знания

Информатика

1 ответ:

Akuma Sempai [76]4 года назад

0 0

Love csodh fish gdiem eeiwbbb xsjdvd

Читайте также

Переделать слово ночь в день за 4 шага,изменяя по одной букве

oktyabrynaN [4.4K]

Ночь - дочь - дичь - динь - день

0 0

4 года назад

За четверть Вася получил 20 оценок. Сообщение о том, что он вчера получил четверку несет 2 бита информации. Сколько четверок пол

мата7 [57]

20:2=10
Ответ:10 бит

0 0

4 года назад

1)Составьте программу обмена в массиве B(N) первого отрицательного и максимального элементов. 2)Составьте программу вставки в ма

Пострадавшая

// PascalABC.NET 3.2, сборка 1383 от 09.02.2017
// Внимание! Если программа не работает, обновите версию!

1)

begin
var b:=ArrRandom(ReadInteger('n='),-99,99); b.Println;
var jn:=b.FindIndex(x->x<0); // индекс первого отрицательного
var jm:=b.IndexMax; // индекс первого максимального
Swap(b[jn],b[jm]); b.Println
end.

Пример
n= 15
33 60 -72 13 -15 -36 21 98 -21 -22 56 -20 0 -98 28
33 60 98 13 -15 -36 21 -72 -21 -22 56 -20 0 -98 28

2)

begin
var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
a:=a[:4]+Arr(8)+a[4:]; a.Println;
end.

Пример
n= 10
65 56 31 74 -4 -54 43 8 -58 -94
65 56 31 74 8 -4 -54 43 8 -58 -94

0 0

4 года назад

Алгоритм вычисления значения функций F(n) и G(n), где n – натуральное число, задан следующими соотношениями: F(1) =5; F(n) =2⋅F(

Алина-тян [4]

javascript:var Ф = н => n => (n == 1 ? н : 2 * F(n - 1) + 5 * n), F = Ф(5), G = Ф(4); alert(F(4) + F(5));

415.

0 0

3 года назад

Сообщение, записанное буквами 8-символьного алфавита, содержит 29 символов. Какой объем информации оно несет?

Amilina

29+2-12випячряошхэпмщсп

0 0

4 года назад