spadikov
?>

Нужна : запишите команду вывода переменной в однострочное окно var a: real

Информатика

Ответы

inaine73

PascalABC.NET 3.7:

##var sumOfAP := function(a1, an, d: real):real → (a1 + an)/2*((an - a1)/d+1);var (a, b) := ReadInteger2('Введите a и b:');var sE := sumOfAP(a + a mod 2, b - b mod 2, 2);var sO := sumOfAP(a + 1 - a mod 2, b - 1 + b mod 2, 2);Print('Результат:', sE - sO)

Пояснение:

Используется формула для нахождения суммы первых n членов арифметической прогрессии:  S = \frac{a_1 + a_n}{2} * (\frac{a_n - a_1}{d} + 1) , где a_1 — первый член прогрессии, a_n — последний член, d —разность прогрессии.

sumOfAP -- функция расчёта суммы арифметической прогрессии.(a, b) -- вводимые числа.ReadInteger2(prompt) -- выводит приглашение к вводу prompt и возвращает кортеж из двух значений типа integer, введенных с клавиатуры.sE и sO -- "sum of Even" и "sum of Odd", сумма чётных и сумма нечётных соответственно.Print -- выводит значения на экран, после каждого значения выводит пробел.
Маша любит четные числа, а миша нечетные. поэтому они всегда радуются, когда встречают числа, которы
Маша любит четные числа, а миша нечетные. поэтому они всегда радуются, когда встречают числа, которы
Маша любит четные числа, а миша нечетные. поэтому они всегда радуются, когда встречают числа, которы
Misyura_Viktoriya1683
С 1 и 3 вопросом больших проблем нет: в Юникод на 1 символ отводится 16 бит (2 байта), поэтому, если посчитать, что служебная информация  в файле отсутствует, текст занимает в 2 раза больше байт, чем в нем символов.
1) ответ d - 288 байт
3) ответ  b - 360000 символов

а вот со 2 проблемы. ASCII, или КОИ-7 - на 1 символ отводилось 7 бит. При этом национальные кодировки (в частности, русская) были возможны только вместо строчных латинских букв. Да и то, только прописные буквы.
Расширенный ASCII, или КОИ-8 - 8-битное кодирование.
В пословице, если написать ее правильно, 26 символов. Так что, ни один из ответов не подходит. Или условие неверно переписано, или это умышленный вопрос без ответа. Где-то так...
Или я безнадежно туплю, но сомневаюсь, что это так))

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

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

Нужна : запишите команду вывода переменной в однострочное окно var a: real
Ваше имя (никнейм)*
Email*
Комментарий*

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

beliaevabeliaeva-olesya35
oxy03214428
pavpe4198
elenasnikitina84
detymira
mdubov59
Vladimir1172
Ka-tja78
jstepanova
armsam76
bistrayakuhnya46
oldprince840
a-zotova
Татьяна_Вологжин
svetkinm158