Var p,h,e,s,t,x: integer;
begin write('Введите стоимость проезда в 1 сторону: ');
readln(p);
write('Введите стоимость проживания в двухместном номере в сутки: ');
readln(h);
write('Введите стоимость питания в сутки: ');
readln(e);
write('Введите стоимость страховки: ');
readln(s);
write('Введите стоимость трансфера: ');
readln(t);
x:=p*2+h*7+e*7+s+t;
writeln('Стоимость тура = ',x, '$', ' - ', x*34.75, 'руб');
<span>end.</span>
Это программа определяет минимальный элемент в массиве
Элементов всего 8
Изначально считается минимальным первый элемент т. е 3
Далее идет проверка в
Первый элемент проверяется со вторым ( 3 < 8) да один раз выполняет
ся , минимальным считается значение массива равное 3
Следующая проверка ( 3< 7) да втрой раз выполняется
Запоминается 3 и т.д .
3 будет меньше 8, 7,9, 4, 10, ( Итого пять раз)
Предпоследнее действие 3 сравнивается с 2 ( условие ложно) не выполняется( не подсчитывается)
И последний проход 3< 12 ( да, истинно) подсчитывается
Итого 6 раз
4*1024 = 4096 МБ
4096 - 800 = 3296 МБ (800 МБ есть, нужно ещё 3296 МБ)
3296 : 512 = 6.4 флешек, округляем получаем 7 флешек.
Ответ: 3
Электронная книга, нарисовать телефон.
Найдите в интернете, там точно все про это есть, просто так и набери "правила создания презентаций"