Задача:
Дано:
Страниц в романе = 736*
t на сканирование = 3 cек
t на смену страницы = 5 сек
t на распознование = 2 сек
Найти:
t общее - ?
1. Вычислим сумму времени всех операций, необходимых для обработки одной страницы:
3 сек + 5 сек + 2 сек = 10 (сек) - требуется на обработку одной страницы.
2. Умножим количество страниц в романе на время обработки одной страницы:
736 × 10 сек = 7360 (сек) - уйдет времени на ввод в память компьютера текста романа.
ответ: 7360 секунд.
* - количество страниц зависит от условий и учебника, я брал количество страниц в книге от издательства АСТ.
// PascalABC.NET
begin
// 1
var s11 := SeqRandom(100, 10, 99).Sum;
var s12 := ArrRandom(100, 10, 99).Sum;
case Sign(s11 - s12) of
-1: Println('Сумма второго массива больше');
0: Println('Суммы равны');
else
Println('Сумма первого массива больше')
end;
// 2
var s21 := SeqRandom(1000, -9, 9).Sum;
var s22 := ArrRandom(1000, -9, 9).Sum;
var s23 := ArrRandom(1000, -9, 9).Sum;
if s21 > s22 then
Swap(s21, s22);
if s22 > s23 then
begin
Swap(s22, s23);
if s21 > s22 then
Swap(s21, s22)
end;
Println(s21, s22, s23);
// 3
var a := ArrRandom(50, -99, 99);
a.Println;
var s31 := a.Where(p -> p > 30);
Print('Количество', s31.Count, ' сумма', s31.Sum)
end.