program lol;
var
a10:array[1..20] of integer;
i:integer;
begin
randomize;
for i:=1 to 20 do
begin
a10[i]:=random(50)-39;
writeln('Element #',i,': ',a10[i]);
end;
writeln;
for i:=1 to 20 do
begin
if a10[i] > 0 then a10[i]:=a10[i]*2;
if a10[i] < 0 then a10[i]:=0;
writeln('Element #',i,': ',a10[i]);
end;
readln;
end.
S:=2*r+d;
:= означает присвоить
2r в математике значит 2умножить на r ( в паскале умножить пишется знаком * )
дальше всё ясно
Переведем число 972 в двоичную систему счисления:
972₁₀ = 1111001100₂
Нужно осуществить 10 циклических сдвигов.
Получаем: 0111100110₂ = 486₁₀
#Предполагается, что точки вводятся#в формате х, у по одной на строкаcoords = []ind = []for i in range(10): coords.append(tuple(map(int, input().split()))) if coords[0] < 0 and coords[1] < 0: ind.append(i)
for i in ind: print('Точка ({0};{1}) находится в 3 четверти'.format(coords[i][0], coords[i][1]))