pbttehnology
?>

Дана программа: Program Primer; Var A, result : real; Begin Writeln('Введите значения переменной A'); Write('A='); Readln(A); Result := sqr((5+A)*6); Writeln ('sqr((5+A)*6)', result:8:0); Readln; End. Запусти Паскаль, введи данную программу, получи результат, если A=3. (В окошко для ответа запиши только числовое значение!) ответ:

Информатика

Ответы

ДеречинскийИрина1149

1. Берілген нүктелер арқылы өтетін түзудің теңдеуін жазыңыз: А(2;1) В(-1;2). [2 ұпай]

2. Шеңбердің берілген теңдеуі бойынша оның центрінің координаталары мен радиусын табыңыз: (х-4)2 +(у+8)2 =36 [1 ұпай]

3. нүктелері берілген.

a) төбелерінің координаталары бойынша салыңыз; [1 ұпай]

b) қабырғаларының ұзындықтарын табыңыз; [3 ұпай]

c) түрін анықтаңыз (теңқабырғалы, теңбүйірлі, тікбұрышты); [2 ұпай]

d) берілген үшбұрыштың ауданын есептеңіз. [2 ұпай]

4. Төбелері А (1;-1) В (0;1) С (4;3) және Д (5;1) нүктелері болатын төртбұрыштың тіктөртбұрыш болатынын дәлелдеп, оның ауданын табыңыз. Ол үшін:

a) төбелерінің координаталары бойынша сызбасын салыңыз; [1 ұпай]

b) қабырғаларының ұзындықтарын табыңыз; [4 ұпай]

c) диагональдарын анықтап, дәлелдеңіз; [2 ұпай]

d) тіктөртбұрыштың ауданын есептеңіз. [2 ұпай]

Объяснение

maximovpavel9114
№1.
Тысячи путей ведут к заблуждению, к истине - только один.
Для начала надо посчитать, сколько всего символов в данном предложении, следует считать знаки препинания и пробелы. 
Посчитав все знаки (Итого:57), мы получаем, что вес предложения 57 байт, переводим в биты, то есть умножаем на 8 (1 байт = 8 бит):
57*8=456.

№2.
Кодировка Unicode - это кодировка, каждый символ которой весит 16 бит. Итак, я посчитала количество знаков в предложении (Итого:32). Дальше: 16*32=512 бит.

№3.
Итак, мы видим, что из 16-битной кодировки получилась 8-битная, а это значит, что она уменьшилась вдвое.
8x=800
x=100 (у тебя ошибка, я посмотрела аналогичные задания, отличающиеся только значениями)

№4 допишу в комментарии.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Дана программа: Program Primer; Var A, result : real; Begin Writeln('Введите значения переменной A'); Write('A='); Readln(A); Result := sqr((5+A)*6); Writeln ('sqr((5+A)*6)', result:8:0); Readln; End. Запусти Паскаль, введи данную программу, получи результат, если A=3. (В окошко для ответа запиши только числовое значение!) ответ:
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

peresvetoff100015
Алексеевич949
Larisa Bulgakova
dashakhmeleva6
mmihail146
julichca68
dannytr
Yelena_Yuliya1847
valerii_Georgievna915
Вершинина1161
phmad7
ananyananar
ipKAV85
Sacharov84
Bobkov