готово
Объяснение:
Задача 1
var
n: integer;
begin
Write('Введите чило >>> ');
ReadLn(n);
if n mod 2 = 0 then
WriteLn('четное')
else
WriteLn('нечетное')
end.
Задача 2
var
n: integer;
begin
Write('Введите год >> ');
ReadLn(n);
if (n mod 100) = 0 then
begin
if (n div 100) mod 4 = 0 then
WriteLn(n, ' год - високосный')
else
WriteLn(n, ' год - не високосный');
end
else
if n mod 4 = 0 then
WriteLn(n, ' год - високосный')
else
WriteLn(n, ' год - не високосный');
end.
Поделитесь своими знаниями, ответьте на вопрос:
Что такое твердый носитель информации?
Или другими словами чтоб тебе понятнее было
Носитель информации это например оптические (CD-ROM, DVD-ROM, Blu-ray Disc);
полупроводниковые (флеш-память, SSD-диски);
магнитные (магнитные ленты, дискеты, жесткие диски). И тд
Туда можно записать информацию и они ее там содержат
И это и называется носитель информации
Жесткий диск на него что то можно записать он носит информацию