1) 2(в степени i)=N. N = 30 (считаем каждый символ с пробелами)
2 в степени i равно 30 => i = 5 бит
var x,y,dist:real;
begin
readln(x,y);
dist:=sqrt(x*x+y*y);
readln(x,y);
x:=sqrt(x*x+y*y);
if (x>dist) then writeln('2-я точка ближе')
else if (x<dist) then writeln('1-я точка ближе')
else writeln('Одинаково')
end.
program raf105;
var a,i: integer;
begin
write('Введите количество повторений: ');
readln(a);
for i:=1 to a do
writeln('Привет!');
end.
<h3><u>PascalABC 3.4.2</u></h3>
Де іменно розбити клітинки?
У всех ли людей всегда бывает пять пальцев?
Уникальны ли отпечатки пальцев каждого человека?
сколько фаланг на каждом пальце?
ноготь - это роговица?
почему некоторые люди умеют странно выгибать пальцы?