Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
ACSII:1символ-1байт
UNICODE:1символ-2байта
"Жираф" = 5 символов
1)5×1=5байт(ACSII)
2)5×2=10Байт(UNICODE)
1) 35-25=10 (чел.) - не являются читателями школьной библиотеки
2) 35-20=15 (чел.) - не являются читателями районной библиотеки
3) (25+20)-35=10 (чел.) - читатели обеих библиотек
4) 20-10=10 (чел.) - читатели только районной библиотеки
5) 25-10=15 (чел.) - читатели только школьной библиотеки
var a: array[1..20] of integer; s,i: integer; begin
s : = 0; for i : = 1 to 20 do begin a[i] : = random(40)-20; if a[i] > 0 thens : = s+a[i]; write(a[i]: 4); end; writeln; writeln(s); end.
Популярные вопросы