 
                                                 
                                                Корисним джерелом інформації є телеконференції UseNet, що представляють собою іб спілкування людей, що мають доступ в мережу Інтернет [1, 9, 11], і призначені для обговорення будь-яких питань або поширення інформації. Повідомлення в UseNet називається листом або статтею. Всі листи групуються за темами в так звані групи новин (Newsgroups), а сукупність новин називається конференціями або новинами (News).
Інформація, вміщена в телеконференцію, стає на певний час доступною всім бажаючим. За поширення інформації в такій формі відповідають спеціальні сервери. Кожен може розмістити в групі своє повідомлення (статтю) або надіслати свою відповідь на чуже. Таким чином виявляються можливими негайна зворотний зв'язок і детальне обговорення будь-якої проблеми з безліччю територіально роз'єднаних людей, яких хвилюють ті ж проблеми, що і вас, і разом вам, ймовірно, вдасться знайти шляхи їх вирішення. Фахівці зможуть отримати від своїх колег швидку та кваліфіковану до .
Объяснение:
Сподіваюся допоміг.
 
                                                1)
program s_parallelogramm;
var
a,h,s: real;
begin
 write('Основание = '); readln(a);
 write('Высота = '); read(h);
 if ((a=0) or (a<0)) or ((h=0) or (h<0)) then writeln('Ошибка! Значения основания и высоты должно быть натуральными числами')
 else
 begin
 s:=a*h;
 writeln('Площадь (S) параллелограмма = ', s);
 end;
end.
2)
program sp_kvadrata;
var
a,p,s: real;
begin
 write('Сторона квадрата = '); readln(a);
 p:=4*a;
 s:=sqr(a);
 writeln('Периметр (P) квадарата = ', p);
 writeln('Площадь (S) квадарата = ', s);
end.
3)
program e_kinet;
var
m,v,e: real;
begin
 write('Масса тела (m, кг) = '); readln(m);
 write('Скорость тела (v, км/ч) = '); readln(v);
 e:=m*sqr(v)/2;
 writeln('Кинетическая энергия (Ек, Дж) = ', e);
end.
1)
program vivod_chisel;
var
i, a: integer;
begin
 a:=11;
 for i:=1 to 45 do
 begin
 write(a:3);
 a:=a+2;
 end;
end.
2)
program sym_trex_chisel_krat5;
var
mas: array[1..900] of integer;
i,a,sym: integer;
begin
 a:=100;
 sym:=0;
 for i:=1 to 900 do
 begin
 mas[i]:=a;
 if mas[i] mod 5 = 0 then sym:=sym+mas[i]; 
 a:=a+1;
 end;
writeln('Сумма трехзначных чисел, кратных 5 = ', sym);
end.
 
                                                 
                                                 
                                                 
                                                 
                                                 
                                                
Объяснение:
a, b=map(int, input().split()) #ввод чисел
c=a+b # создаём переменную, куда задаем значение суммы цифры
print(c) #выводим значение с