Чтобы обойтись без калькулятора, будем пользоваться степенями двойки (все равно переводить потом в килобайты или мегабайты).
1. Определим количество символов на странице
40×64 = 4×10×2⁶ = 2²×10×2⁶ = 10×2⁸
2. Определим количество символов в статье
32×10×2⁸ = 2⁵×10×2⁸ = 10×2¹³
3. В КОИ-8 каждый символ кодируется 8 битами, т.е. 1 байтом.
Объем статьи будет равен 10×2¹³ байт.
4. Переведем в килобайты, зная что 1 Кбайт = 2¹⁰ байт.
10×2¹³/2¹⁰ = 10×2³ = 10×8 = 80 Кбайт
Const N = 30; // Количетсво дней
var
i,count:integer;
h: array [1..N] of integer;
begin
count:=0;
writeln('Введите количество осадков');
for i:=1 to N do
read(h[i]);
for i:=1 to N do
if h[i]>0 then
count:=count+1;
writeln('Количество дождливых дней ', count)
end.
В первой строке указываем количество дней. Это константа N
Далее объявляем, что переменная count равна 0. В этой переменной мы будем хранить количество дней с осадками.
Далее мы вводим с клавиатуры 30 чисел, показывающих осадки.
Потом мы проверяем, если число в массиве больше нуля, то мы увеличиваем count на единицу. Тоесть прибавляем +1 день с осадками.
В конце выводим количество дней с осадками
По моим рассуждениям это: 3)7, была бы норм фотка то точно бы сказал.
Все верно. Но лучше использовать заместо цикла while, цикл for. И не нужна запись str, и.к. Изначально ужевводится в строковом виде
Пусть старший брат идет со скоростью 1, тогда младший:
1 * (100-10)% * (100+10)% = 1 * 0,9 * 1,1 = 0,99. Вывод:
Старший брат прийдет быстрее.