Составить ! если несколько команд набрали одинаковое количество очков, то места между ними распределяются по разнице забитых и пропущенных мячей: чем разница больше, тем место выше. попробуйте усовершенствовать программу, учитывая это правило. для этого в программу надо добавить массив с разницами мячей.
)Соберите данные из текста, и создайте диаграмму или постер.
САМ ТЕКСТ↓↓↓↓↓
«Ұлы Жібек жолы» — Қазақстан жері арқылы өткен сауда-саттық жолы.
Қазақстанның ортағасырлық қалаВЫФФФларында жүргізілген қазба жұмыстары кезінде археологтер
Қытай мен Византия, Иран мен Үндістан елдерінде соғылған теңгелер мен ділдаларды
тапқан. Алматы қаласының маңындағы Талғар қаласының орнын қазған кезде Иранда
жаЗалған қола табақ, қытай фарфоры мен жапонның фаянс тостағанының сынығы және т.б.
бұйымдар табылған.
«Ұлы Жібек жолының» бойымен саудагерлер Ферғананың әйгілі тұлпарларын, түйе,
пілдермен қатар барқыт, жібек, мақпал, торғын маталарды, киім-кешекті және т. б. бағалы
тауарларды сату үшін алып өткен. Осы жол арқылы қант, жүзім, шабдалы, қауын сияқты
жеміс-жидек те саудаланған.
Объяснение:
На Паскале:
program prog;
var
a:array[1..20] of integer = (1,3,2,5,3,2,1,3,5,2,6,3,5,6,2,3,4,5,7,6);
i,c:integer;
begin
c:=0;
for i:=1 to 20 do if a[i]>3 then c:=c+1;
write('Количество дней с температурой воздуха больше 3 градусов: ', c);
end.
На Питоне:
c = 0
a = [1,3,2,5,3,2,1,3,5,2,6,3,5,6,2,3,4,5,7,6]
for i in a:
if i > 3: c+=1
print(f'Количество дней с температурой воздуха больше 3 градусов: {c}')
Если нужно вводить температуру с клавиатуры:
На Паскале:
program prog;
var
a:array[1..20] of integer;
i,c:integer;
begin
c:=0;
for i:=1 to 20 do begin
write('Введите температуру ', i, '-го дня: '); readln(a[i]);
if a[i]>3 then c:=c+1;
end;
write('Количество дней с температурой воздуха больше 3 градусов: ', c);
end.
На Питоне:
c = 0
a = [int(input(f'Введите температуру {i+1}-го дня: ')) for i in range(20)]
print(a)
for i in a:
if i > 3: c+=1
print(f'Количество дней с температурой воздуха больше 3 градусов: {c}')