Блок-схемы - во вложениях
1.
Program Irina09Gross1;
const n=10;
var a,b,c,p,s: real;
begin
writeln('*** Alphaues is thinking... ***');
writeln('*** OK! ***');
writeln();
writeln('Введите стороны треугольника');
write('Введите а');
readln(a);
write('Введите b');
readln(b);
write('Введите c');
readln(c);
p:=(a+b+C)/2;
S := sqrt(p*(p-a)*(p-b)*(p-c));
writeln('Площадь треугольника равна ',s);
end.
2.
Program Irina09Gross2;
const n=10;
var a,b,h,v,s,r: real;
begin
writeln('*** Alphaues is thinking... ***');
writeln('*** OK! ***');
writeln();
write('Введите длину основания ');
readln(a);
write('Введите ширину основания ');
readln(b);
write('Введите высоту параллелепипеда ');
readln(h);
s := 2*(a*b+b*h+h*a);
v := a*b*h;
r := 4*(a+b+h);
writeln('Объём равен ',v);
writeln('Площадь полной поверхности равна ',s);
writeln('Сумма рёбер равна ',r);
end.
a = int(input('Введите количество друзей:')) #вводим количетсво друзей
name = [] # создаем пустой список
age = 0
for i in range(a): # проходим по колисчетсву друзей
q = input('Введите имя и возраст друга через пробел:').split() # вводим имя и возраст и розбиваем их отдельно
name.append(q[0]) # добавляем имя в список
age = age + int(q[1]) # сумируем весь возраст
age = age / a # находим средний возраст
if age<10: # если меньше 10 то выводим возраст
print(age)
elif age>10: # если больше 10
print(age) #выводим возраст
for b in name: # обходим список с именами
print(b) # выводим имя
Объяснение: