<u>Pascal:</u>
program loop;
var a,s:real;
begin
While s < 100 do
begin
readln(a);
s:= s+a;
end;
end.
<u>-----------------------------</u>
<u>Python:</u>
s = 0
while s < 100:
s += float(input())
<u>-----------------------------</u>
<u>Блок-схема:</u>
<u>"Приложил скриншот" см. ниже:</u>
54135256474
22561313165461313232333333 вот ответ
Длиной не менее 2 и не более 4 символов можно закодировать последовательности из 2-х, 3-х и 4-х символов.
Определим количество каждого и сложим.
Каждый сигнал принимает одно из трёх значений.
2 символа - 3^2 = 9
3 символа - 3^3 = 27
4 символа - 3^4 = 81
9+27+81 = 117
Program znanija;
const n = 5;
var
a:array[1..n] of integer;
premax, premaxi, maxi, max, i, b:integer;
begin
max := -1000;
write('Введите массив из ', n, ' элементов:');
for i := 1 to n do
begin
read(b);
a[i] := b;
if b > max then
begin
premax := max;
premaxi := maxi;
max := b;
maxi := i;
end;
end;
writeln('Максимальный элемент №1: ', max, ',его номер ', maxi);
writeln('Максимальный элемент №2: ', premax, ',его номер ', premaxi);
end.
Пусть х - основание системы счисления
Составляем уравнение
1*x^2+2 = 2*(1*x+2)+1
x^2 - 2x + 2-4-1 = 0
x^2 - 2x - 3 = 0
корни 3 и -1
Значит х = 3 (больше 0)