для старо русской системы весов известны следующие соотношения:
1пуд= 3840 золотников; 1 фунт= 96 золотников. Дано N золотников, переведите следующую сумму в пуды, фунты и золотники
Сумма ( N) =15378;, решить через паскаль​

Тут есть несколько вариантов, как это можно записать:

Если номера месяцев не превысят 12, то есть имеются ввиду только месяцы одного года, то вот так:

Var
N:integer;
Begin
WriteLn('Введите номер месяца');
ReadLn(N);
if (N = 12)or(N = 1)or(N = 2) then WriteLn('Зима') //если N = 12, 1 или 2, то выводим 'Зима', иначе идём по следующей ветке if, проверяем следующее условие
else if (N = 3)or(N = 4)or(N = 5) then WriteLn('Весна') // тут точно также N = 3, 4 или 5, если нет - то проверяем следующее условие
else if (N = 6)or(N = 7)or(N = 8) then WriteLn('Лето')
else if (N = 9)or(N = 10)or(N = 11) then WriteLn('Осень')
End.

Если же номер месяца может превысить 12, то перед проверкой нужно найти остаток от деления этого числа на количество месяцев, то есть на 12. При этом остаток от деления 12 на 12 = 0.

Var
N:integer;
Begin
WriteLn('Введите номер месяца');
ReadLn(N);
N:= N mod 12;
if (N = 0)or(N = 1)or(N = 2) then WriteLn('Зима')
else if (N = 3)or(N = 4)or(N = 5) then WriteLn('Весна')
else if (N = 6)or(N = 7)or(N = 8) then WriteLn('Лето')
else if (N = 9)or(N = 10)or(N = 11) then WriteLn('Осень')
End.

Эти же самые условия можно записать иначе:
if (N>=0)and(N<=2) then
или:
if (N>=0)and(N<3) then

512 бит = 512/8= 64 байт

1073741824 байт =1073741824/1024=1048576 Кбайт / 1024= 1024 Мбайт

1024 Кбайт = 1024*1024=1048576 байт

4

Дискета 3,5 = 720 Кбайт

СD= 650 Мбайт

DVD= 1,4 Гбайт- 17,08Гбайт

Жесткий диск = до 5 Тбайт (Терабайт)

5

30 Кбайт= 30*1024 = 30720 байт

125 Кбайт  =  125* 1024 =128000 байт

1024 Кбайт = 1024* 1024 = 1048576 байт

71 Кбайт = 71 * 1024 = 72704 байт

13 Гбайт = 13*1024=13312Мбайт=13312*1024=13631488Кбай= 13631488 * 1024 = 13958643712байт

9216 байт = 9216/1024 = 9 Кбайт

32 Гбайт = 32*1024*1024=33554432 Кбайт

769Мбайт = 769*1024 = 787456 Кбайт

512 байт = 512 /1024 = 0,5 Кбайт

70254592 байт = 70254592/1024/1024=67 Мбайт

42 Гбайт = 42*1024= 43008 Мбайт

20482 Кбайт = 20482/1024 = 20Мбайт

2 Гбайт =2*1024=2048 Мбайт