//Pascal ABC.NET v3.1 сборка 1172
Var
c:char;
begin
readln(c);
if ((c>='a') and (c<='z')) or ((c>='A') and (c<='Z')) or ((c>='А') and (c<='п')) or ((c>='p') and (c<='ё')) then writeln('Буква') else writeln('Символ');
end.
Пример ввода:
ю
Пример вывода:
Буква
Смотри, x:=x+y Сам Y у нас тут не меняется, значит менялся только X. отсюда получаем 4=x+27 обычное уравнение. x=4-27=-23.
А т.к. Y не менялся, первоначальные значения равны:
x=-23, y=27
1) 30*1024*8 бит .
2) 20*48*16. Занимает одна страница.
3) 30*1024*8/20*48*16.
Ответ:16 страниц
"Последние действие лучше записать дробью и выполнить необходимые сокращение".
Пуск-Панель управления-Мышь- Свойство