Установите соответствие между элементами двух множеств. Известно назначение каждой переменной. Соедините данные и достаточный по занимаемой памяти тип.

W — название дня недели

H — высота горы (в км)

L — гласная буква русского алфавита

D — количество дней года

K — номер подъезда многоквартирного дома

F — факт наличия заграничного паспорта.

Char

Integer

String

Byte

Real

Boolean​

Char  L — гласная буква русского алфавита

Integer  D — количество дней года

String W — название дня недели

Byte K — номер подъезда многоквартирного дома

Real  H — высота горы (в км)

Boolean​ F — факт наличия заграничного паспорта.

На счет Real и integer не уверен, если все правильно отпишите

04₁₀ = 100₂

10₁₀ = 1010₂

1996₁₀ = 11111001100₂

for a : = 1 to 20 do

begin

    writeln(a,"^2 = ", a*a);

end

или

a: = 1;

repeat

    writeln(a,"^2 = ", a*a);

    a : = a + 1;

until a > 20;