Const
nn=100;
type
Abit=record
fio:string;
ball:array[1..3] of byte;
from:string;
midb:real
end;
var
t:Abit;
mAb:array[1..nn] of Abit;
i,j,n,m:integer;
midinst:real;
begin
{ ввод исходных данных }
Write('Количество абитуриентов (до 100): '); Readln(n);
Write('Средний балл по институту: '); Readln(midinst);
m:=0;
for i:=1 to n do
begin
Writeln('Абитуриент № ',i);
With mAb[i] do begin
Write('Фамилия, И.О.: '); Readln(fio);
Write('Баллы по трем предметам через пробел: ');
Readln(ball[1],ball[2],ball[3]);
midb:=(ball[1]+ball[2]+ball[3])/3;
Write('Место жительства: '); Readln(from)
end;
if mAb[i].midb>midinst then m:=m+1;
end;
{ простейшая обменная сортировка по убыванию }
for i:=1 to n-1 do
for j:=i+1 to n do
if mAb[i].midb<mAb[j].midb then begin
t:=mAb[i];
mAb[i]:=mAb[j];
mAb[j]:=t
end;
{ вывод }
Writeln;
Writeln('Количество поступающих со средним баллом выше среднеинститутского: ',m);
for i:=1 to n do
with mAb[i] do
Writeln(fio,' ',ball[1]:2,ball[2]:2,ball[3]:2,' ',from)
end.
<em><u>Тестовое решение:</u></em>
Количество абитуриентов (до 100): 4
Средний балл по институту: 5.94
Абитуриент № 1
Фамилия, И.О.: Иванов А.Г.
Баллы по трем предметам через пробел: 9 7 5
Место жительства: Вологда
Абитуриент № 2
Фамилия, И.О.: Петров Л.Л.
Баллы по трем предметам через пробел: 9 9 9
Место жительства: Грязевец
Абитуриент № 3
Фамилия, И.О.: Раковский Д.Г.
Баллы по трем предметам через пробел: 4 4 5
Место жительства: Сокол
Абитуриент № 4
Фамилия, И.О.: Акимова Я.С.
Баллы по трем предметам через пробел: 9 5 4
Место жительства: Харовск
Количество поступающих со средним баллом выше среднеинститутского: 3
Петров Л.Л. 9 9 9 Грязевец
Иванов А.Г. 9 7 5 Вологда
Акимова Я.С. 9 5 4 Харовск
Раковский Д.Г. 4 4 5 Сокол
<h2>Программа не будет работать без <u>ключевого слова алг</u> и <u>ключевого слова кон</u></h2>
2 Гб = 2048 Мбайт = 2097152 Кбайт
100*90= 9000 Кб (На одну книгу)
2097152/9000 = 233 книги
Ответ:
F10 нажимай если уже все.
Объяснение:
<h3>1)</h3>
a = input()
b = input()
answ = ((a*a)+(b*b))
print(answ)
answ = (a**3)*(b**3)
print(answ)
<h3>2)</h3>
r = float(input("Радиус круга: "))
p = 3.14
print(r*r*p)
print(2*p*r)
<h3>3)</h3>
a, b, c = map(int, input().split())
if b >= a <= c:
print(a)
elif a >= b <= c:
print(b)
else:
print(c)
<h3>4)</h3>
<em>не забывай про табуляции</em>
def dog():
out = 0
years = int(input())
if (years <= 2):
out = years * 10.5
return out
elif (years > 2):
while(years != 2):
out += 4
years -= 1
out += 2 * 10.5
return out
def cat():
out = 0
years = int(input())
if (years <= 2):
out = years * 12.5
return out
elif (years > 2):
while(years != 2):
out += 4
years -= 1
out += 2 * 12.5
return out
if __name__ == '__main__':
pet = input()
if(pet == "собака"):
print(dog())
if(pet == "кошка"):
print(cat())
<h3>5)</h3>
со вложенными ничего не придумал
def letdothatprint():
lenght = 5
high = 7
print("* " * lenght) #Just top
while (high != 1):
print((lenght-1) * " " + "*")
high -= 1
if __name__ == '__main__':
letdothatprint()