var n, i: integer; s: real; begin readln(n); for i : = 1 to n do s : = s + exp(i*ln(i)); writeln(s); end
Равилевич_Олеговна1496
23.03.2021
Строго запрещается: находиться во время перемены в компьютерном классе без разрешения старшего (преподавателя); включать без разрешения оборудование; трогать разъемы соединительных кабелей и проводов(возможно поражение электрическим током); прикасаться к питающим и устройствам заземления; прикасаться к экрану и к тыльной стороне монитора, клавиатуры; включать и выключать аппаратуру без указания преподавателя; работать в верхней одежде и влажными руками; прыгать, бегать (пылить); класть диски, книги, тетради и другие предметы на монитор и клавиатуру; устанавливать или копировать программы с дискет, дисков и флеш-носителей на компьютер, предварительно не проверив их антивирусом; при появлении запаха гари немедленно прекратите работу, выключите аппаратуру и сообщите об этом преподавателю. во время работы: строго выполняйте все указанные выше правила, а также текущие указания преподавателя; следите за исправностью аппаратуры и немедленно прекращайте работу при появлении необычного звука или самопроизвольного отключения аппаратуры; легко и быстро нажимайте на клавиши, не допуская резких ударов; не пользуйтесь клавиатурой и мышью, если не включен компьютер; работайте на клавиатуре чистыми руками; никогда не пытайтесь самостоятельно устранить неисправность в работе аппаратуры; не вставайте со своих рабочих мест, когда в кабинет входят посетители.
nebo2020
23.03.2021
1. сообщение о том, что выбран 1 из 4 равновозможных вариантов содержит log2(4) = 2 бита информации (2^2 = 4). 2. всего символов 150 * 40 * 60 = 360 000. если считать, что каждый символ кодируется одним байтом, получится 360 000 байт = 351,6 кбайт (1 кбайт = 1024 байт) 3. на каждый символ отводится log2(64) = 6 бит, а объём документа 0,75 кбайт = 0,75 * 1 024 байт = 0,75 * 8 * 1 024 бит = 6 144 бит. поэтому общее количество символов 6 144 / 6 = 1024. на одну страницу приходится 1024 / 32 = 32 символа.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Написать программу на языке паскаля для вычисления s=1^1+2^2+3^3++n^n
var n, i: integer; s: real; begin readln(n); for i : = 1 to n do s : = s + exp(i*ln(i)); writeln(s); end