//Pascal
var
Ez: byte;
z: real;
begin
writeln('1 - дециметр, 2 - километр, 3 - метр, 4 - миллиметр, 5 - сантиметр');
write('Введите номер единицы измерения: '); readln(Ez);
write('Введите длинну: '); readln(z);
if Ez = 1 then writeln(z/10, ' м');
if Ez = 2 then writeln(z*1000, ' м');
if Ez = 3 then writeln(z, ' м');
if Ez = 4 then writeln(z/1000, ' м');
if Ez = 5 then writeln(z/100, ' м');
readln;
end.
Кол - во символов в тексте - 150 * 1024 * 8 / 16 = 76800
Кол - во символов на странице - 76800 / 120 = 640
кол - во символов в 1 строке - 640 / 80 = 8
Оно будет ложным для 4:
Не( у гласная) или ( и не согласная)
Ложь или ложь= ложь