Получилось на 15 мин быстрее)))
Как я понял, нужно определить, какая буква введена с клавиатуры - большая или маленькая, сделала для английского и русского языка
program one;
var
a:string;
begin
readln(a);
if a[1] in ['a'..'z'] then writeln('Маленькая');
if a[1] in ['A'..'Z'] then writeln('Большая');
if a[1] in ['а'..'я'] then writeln('Маленькая');
if a[1] in ['А'..'Я'] then writeln('Большая');
<span>end.</span>
4 да я знаю я это самастаятельную прохадил
Это когда все события стоят в том порядке, когда они были! ну например. . вчера, сегодня завтра.<span>Хронос - это по-гречески "время". То есть события располагаются так, как они действительно происходили. </span>
1) 512=2^9; - 9 бит 1 пиксель после сжатия;
4096=2^12 - 12 бит 1 пиксель до сжатия
2) 12/9=4/3 - каждый пиксель после сжатия уменьшит свой размер в (4/3) раза
3) 1050*4/3=350*4=1400 (Кбайт)
Div берет целую часть от деления
15/4 = <span>3.75
Целая часть числа 3.75 = 3
</span>X = 3
begin
writeln(15 div 4);
end.