1) var a,b:integer;beginreadln(a,b);if a>b thenwriteln(a+b,' задача решена')else writeln(a*b,' задача решена');end.
2) !!! ; 3 ; 16 ; 7 ; 8 ; 29 ; 66
3) 1
4) -5; 0; -6; 5; -0.4; 0.32; -17; 15; 11; 7; 8
var
A: Integer;
begin
WriteLn ('Введите целое число:');
Readln (A);
Writeln;
Writeln ('Квадрат этого числа = ' + IntToStr (A * A));
end;
<span>import math
a = list(str(input()).split<span>()) #Cделано по теореме Пифагора. Вроде работает
</span>a1 = int(a[0]<span>)
</span>a2 = int(a[1]<span>)
</span>b = list(str(input()).split<span>())
</span>b1 = int(b[0]<span>)
</span>b2 = int(b[1]<span>)
</span>c = list(str(input()).split<span>())
</span>c1 = int(c[0]<span>)
</span>c2 = int(c[1]<span>)
</span>katB1=math.fabs(a1-b1<span>)
</span>katB2=math.fabs(a2-b2<span>)
</span>
katC1=math.fabs(a1-c1<span>)
</span>katC2=math.fabs(a2-c2<span>)
</span>
RBA = math.sqrt(katB1**2+katB2**2<span>)
</span>RAC = math.sqrt(katC1**2+katC2**2<span>)
</span>if RBA<RAC<span>:
</span> print('Точка B ближе'<span>)
</span> print('Расстояние до точки:',RBA<span>)
</span>elif RAC<RBA<span>:
</span> print('Точка C ближе'<span>)
</span> print('Расстояние до точки:',RAC<span>)
</span>else<span>:
</span> print('Точки находятся на одинаковом расстоянии'<span>)
</span> print('Расстояние до точки А',RBA<span>)</span></span>
18 слов.
1.вид такни называется хлопок.
2.хлебо-булочное изделие с разной начинкой-это пироги
3.вид речных рыб-окуни
4.преправа для блюд-соль.
5.небольшая часть тканей(волос)называется прядью
6.срезал-оторвать от целого тела часть
7.чувство, при которых человек чувствует раздражение, боль, досаду называется мУками.
1010101010101010
0101010101010101