?>
9 клас. Урок № 59 виконати з до пайтон Практична робота №17. «Знаходження мінімального, максимального значення списку, сума та середнє значення елементів.» Задання 2. У фінальних змаганнях з бігу на 1500 м беруть участь 8 спортсменів. Розробіть програму створення списку (масиву), елементами якого є час подолання дистанції кожним спортсменом. Визначте середній час подолання дистанції. Завдання 3. Учениця Марія щодня з 1 до 10 грудня протягом 4 років о 15.00 вела за станом температури повітря й зберігала у щоденнику. Розробіть програму визначення середньої щорічної температури за цей період. Визначте середню статистичну температуру за період . Завдання 4. Знайди в Інтернеті 5 найбільших за чисельністю населених міст Одеської області. Розробіть програму створення відповідного списку, визначення загальної кількості населення цих міст, найбільшого та найменшого з них чисельністю. Завдання 5. У магазин доставлено: 50 кг цукру за ціною 15 грн за кілограм; 100 кг борошна – 8 грн/кг; 12 кг м’яса – 95 грн/кг; 20 кг риби – 70 грн/кг. Розробіть програму створення відповідного списку й визначення загальної вартості та загальної маси доставлених продукті, вартості кожного виду
Ответы
Задача 1:
var a,b: real;
var c: char;
begin
write('Введите a: ');
readln(a);
write('Введите b: ');
readln(b);
write('Введите нужную операцию (+,-,*,/): ');
readln(c);
if (c='+') then writeln('Результат: ',a+b)
else if (c='-') then writeln('Результат: ',a-b)
else if (c='*') then writeln('Результат: ',a*b)
else if (c='/') then writeln('Результат: ',a/b);
end.
Задача 2:
var a: integer;
begin
write('Введите количество кроликов: ');
readln(a);
write('Количество морковок: ',3*100+a*2);
end.
Задача 3:
var a: integer;
begin
write('Введите число: ');
readln(a);
write('Последняя цифра числа: ',a mod 10);
end.