Var n,m:integer;
begin
write('Число = '); readln(n);
write('Цифра = '); readln(m);
if (n div 100 = m)or(n div 10 mod 10 = m)or(n mod 10 = m)
then writeln('Цифра есть')
else writeln('Цифры нет');
end.
Пример:
Число = 519
Цифра = 5
Цифра есть
Я тебе даю формулы ты уже выбирай сам какую
1) Вес файла = 640 * 480 * 24 = 7372800 бит ( 8 * 3 = 24 бит)
Времени понадобится = 7372800/28800 = 256 секунд
2) x МБайт = 1024x КБайт
10ГБайт = 10 * 1024 * 1024 =
КБайт
Откуда
3) Это аналог двоичной системы счисления, где
A = 0, Б = 1.
На первом позиции стоит число со значением 0.
Значит на 7 месте будет число 7 - 1 = 6 = 110 = ББА
1.Берём чашку.
2.Ставим на стол
3.берём чайник
4.наливаем в него воду
6. ставим её греть
7.выключаем чайник после подогрева
8 достаём чай
9 ложим пакетик чая в чашку
10 заливаем водой
11.по желанию можно добавить сахар
12когда чай достаточно заварился,вытяни покетик с чаем
13. и выкинь его в мусорку