Программа:
Pascal:
var
f, years, weeks, days: integer;
begin
readln(f);
years := f div 365;
weeks := (f - years * 365) div 7;
days := f - years * 365 - weeks * 7;
writeln(f, ' дней - это ', years, ' лет, ', weeks, ' недель, ', days, ' дней.');
end.
Объяснение:
В начале регистрируются переменные f, years, weeks, days. Далее - вводится число f (дней). Число полных лет - результат целочисленного деления f на 365. Число полных недель - результат целочисленного деления оставшегося количества дней на 7. Число дней - оставшиеся количество дней после определения years и weeks. В конце - вывод этих значений.
Результат:
1000
1000 дней - это 2 лет, 38 недель, 4 дней.
Объяснение:
защиты информации на компьютере
2: шифрование данных ...
3: использование антивирусной программы ...
4: установка пароля на BIOS и/или жесткий диск ...
5: использование протокола HTTPS. ...
6: защита беспроводных сетей ...
Как защитить Информационная безопасность — практика предотвращения несанкционированного доступа, использования, раскрытия, искажения, изменения, исследования, записи или уничтожения информации. Это универсальное понятие применяется вне зависимости от формы, которую могут принимать данные на компьютере надежнее всего.
(см. объяснение)
Объяснение:
Напишем программу на Python 3:
k = 0
for i in input():
if (ord(i) in range(65, 91)) or (ord(i) in range(97, 123)):
k += 1
print(k)
Задание выполнено!
Комментарий 1:
Замечу, что то же самое легко сделать на паскале:
##
var k: integer := 0;
foreach var c: char in ReadString do
if((ord(c) in [65..90]) or (ord(c) in [97..122]))
then k:= k+1;
print(k);
Комментарий 2:
Задачу можно было решить несколько иначе:
k = 0
for i in input():
if ('a' <= i <= 'z') or ('A' <= i <= 'Z'):
k += 1
print(k)
Комментарий 3:
Решение из комментария 2 тоже несложно написать на паскале:
##
var k: integer := 0;
foreach var c: char in ReadString do
if((c in ['a'..'z']) or (c in ['A'..'Z']))
then k:= k+1;
print(k);