Var a:array [1..10] of integer;
i,n:integer;
begin
n:=0;
for i:=1 to 10 do
begin
write ('Введите ',i,' число: ');
readln (a[i]);
n:=n+a[i];
end;
WRITELN;
write ('Сумма элементов в массиве = ',n);
end.
a = 1
n = 4 #odd
b = 3 #even
while a != -1:
a = int(input("Insert number:"))
if a == -1:
break
if > b
b += 1
if a > n
n += 1
print(odd)
Письменность была нужна для оформления сделок, фиксации движения товаров, выручки, учета, финикийцы известны, прежде всего, как предприимчивые торговцы и отважные мореплаватели.
1) 31(Просто считаешь все символы + пробелы)
2)4 (32/8)
3)107