Program CrazyCoder;

var i,n:byte;
k:integer;
a:array [1..10] of integer;
begin
randomize;
writeln('Исходный массив');
for i:=1 to 10 do
begin
a[i]:=random(21)-10;
write(a[i],' ');
end;
writeln;
write('Введите кол-во смещений: ');
read(n);
repeat
k:=a[2];
for i:=2 to 9 do
a[i]:=a[i+1];
a[10]:=k;
n:=n-1;
until n=0;
writeln('Результат:');
for i:=1 to 10 do
write(a[i],' ');
writeln;
end<span>.</span>

0 0

4 года назад

Сколько столбцов, строк и листов содержит лист MS Excel 2010?

bernol [24]

Общее количество строк и столбцов на листе : 1 048 576 строк и 16 384 столбца. Можешь проверить на офф.сайте Майкрософт

0 0

4 года назад

Программирование на PythonТЕМА: Перевод единиц измеренияЗаданиеНапишите программу, которая бы выполняла переводединиц измерения.

Анна14701

Ответ:

a = float(input("Введите в каких единицах измерения будите вводить числа. 1 - килобайты, 2 - мегобайты, 3 - гигобайты... (терабайт, петабайт, эксабайт, зеттабайт, йоттобайт) "))

b = float(input("введите число "))

vid = float(input("введите в какие единицы хотите перевести число (см первую запись) "))

d = 1024**a * b

er = 1024**vid

print(d/er )

Объяснение:

0 0

4 года назад