Var a:array[1..10] of integer;
i,sum:integer;
begin
sum:=0;
for i:=1 to 10 do
begin
readln(a[i]);
sum:=sum+a[i];
end;
writeln(sum/10)
end.
1) 10 х 15 см, - это 100 х 150 мм.
2) найдём общее количество точек в изображении: (100*50)*(150*50)=5000*7500=37500000.
3) для 16 цветов достаточно 4 бит, т.к. 16=2^4, поэтому: 37500000*4=150000000(бит) /8=18750000(Байт) /1024=18370,5469(Килобайт) /1024=17,8813835(Мегабайт).
Var j,i:longint;
begin
for i:=2 to 3628800 begin
for j:=2 to 3628800 do writeln(i*j:10);writeln();
end;
readln;
end<span>.</span>
print(max(7,22,37,16,8))
print(sum([17, 22, 37, 12.5, 13, 33.4, 9]))
print(37%5)
import random
print(random.randint(5,20))
print(int(46.7))
print(int('78'))
import math
print(math.pi)
print(math.e)
print(math.factorial(7))
Никак, покупай лицензию, там автоматическое обновление.