Задание 1 во вложении.
Задание2.
const
m = 20;{максимальное количество элементов}
var
a: array[1..m] of real;
i, n: integer;
begin
Write('Введите количество элементов (от 1 до 20): ');
Readln(n);
Writeln('Вводите через пробел элементы массива');
for i := 1 to n do
begin
Read(a[i]);
a[i] := sqr(a[i])
end;
Writeln('Результирующий массив:');
for i := 1 to n do Write(a[i]:0:4, ' ');
Writeln
end.
Тестовое решение:
Введите количество элементов (от 1 до 20): 5
Вводите через пробел элементы массива
1.3 2.7 -4 4.23 0
Результирующий массив:
1.6900 7.2900 16.0000 17.8929 0.0000
3 клетки вниз, 2 влево, 1 вниз, 3 вправо, 4 вниз, 1 влево, 3 вверх, 1 влево, 7 вниз, 1 вправо, 1 вниз, 2 влево, 4 вверх. Надеюсь так)
1. В десятичную
63=99
8С=140
143=99
214=140
100001001=265
2. В восьмиричную
113=161
94=136
3. В двоичную
299=100101011
338=101010010
400=110010000
4. В 16-ричную
194=С2
11=6F
100=64
П.С. Напиши только системы счисления :)
Var x: integer;
begin
readln(x);
writeln(x*x*x*x*x*x*x*x*x*x*x*x*x*x*x);
end.
Нужно задать вопрос любому из них: "Если бы ты отвечал на вопрос:"За какой дверью дракон", что бы ты ответил?" Если спросили честного, он и ответит так, как бы ответил. Если спросили лжеца, то он соврет относительно своего ответа, т.е. в любом случае ответит правдиво. Как бы двойной фильтр, результат которого для лжи и правды одинаков.
