1 гб = 1024 мб
1 мб = 1024 кб
0.00390626 гб = 4 мб = 4096 кб
<em>// PascalABC.NET 3.2, сборка 1425 от 22.04.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var s:=ReadlnString('Вводите:');
for var i:=1 to s.Length do s[:i+1].Println;
Writeln;
for var i:=s.Length downto 1 do s[:i+1].Println;
end.
<u>Пример</u>
Вводите: слово
с
сл
сло
слов
слово
слово
слов
сло
сл
с
1 символ кодируется 16 битами.
Размер оказался на 14 байт меньше, это 112 бит.
112 / 16 = 7
На 7 символов стал короче текст. Слово состоит из 5 букв, так как у нас еще пробел и запятая.
Ответ: Выдра.
Using System;
public class MainClass
{
public static void Main()
{
Console.Write("Введите количество элементов массива: ");
int size = Convert.ToInt32(Console.ReadLine());
int[] a = new int[size];
for (int i = 0; i < size; i++) {
Console.Write($"[{i}] = ");
a[i] = Convert.ToInt32(Console.ReadLine());
}
int prev = a[0];
for (int i = 1; i < size; i++) {
if (a[i] <= prev) {
Console.WriteLine("Последовательность не возрастающая");
return;
} else {
prev = a[1];
}
}
Console.WriteLine("Последовательность возрастающая");
return;
}
}