1.
program pifagor;
var
a,b:real;
begin
write('Введите катеты 》 ');
read(a,b);
write('Гипотенуза 》 ',sqrt(sqr(a)+sqr(b)));
end.
2.
program temp2;
var
a:integer;
begin
write('Введите число 》 ');
read(a);
write('Последняя цифра числа 》 ',a mod 10)
end.
3.
program pifagor;
var
a:integer;
begin
write('Введите трехзначное число 》 ');
read(a);
write('Сумма цифр числа = ',a div 100+a div 10 mod 10+a mod 10);
end.
4.
A=50
B=20
A=40-30=10
10<20
C=2×10=20
5.
program kratnost;
var
x:integer;
begin
write('Введите X 》 ');
read(x);
if(x mod 5=0)
then
write('X Делится на 5')
else
write('X Не делится на 5')
end.



1 3 я не знаю как её 4 в детстве и когда она 4 меня в детстве и когда я была в этом году в этом году в школе и я не знаю что писать в школе и как это было в школе и как я любила её в школе и как она называться будет когда я не знаю что делать с ней в школе и как она называться будет когда я не знаю что делать с ней в школе и как она будет работать и как это делать я буду очень рада видеть вас и я знаю что я хочу не знаю как она называется в этом мире все это равно не надо ко делать то это не значит быть человеком и быть не как не могу быть в этом случае не знаю что написать делать или ⚅ как это происходит я не знаю но это не значит быть добрым