Информатика | 10 - 11 классы
Pascal Помогите пожалуйста!
Помогите, пожалуйста?
Помогите, пожалуйста!
Очень надо.
Напишите на языке Pascal.
Пожалуйста помогите решить задачу на языке Pascal?
Пожалуйста помогите решить задачу на языке Pascal.
Задача 2.
Номер 7 ?
Номер 7 .
Рисунок 34 .
Помогите пожалуйста ( Pascal).
ПОМОГИТЕ В PASCAL ПОЖАЛУЙСТА ток Г , Д?
ПОМОГИТЕ В PASCAL ПОЖАЛУЙСТА ток Г , Д.
ПОМОГИТЕ, ПОЖАЛУЙСТА, очень срочно нужно написать программу в Pascal(ABC)?
ПОМОГИТЕ, ПОЖАЛУЙСТА, очень срочно нужно написать программу в Pascal(ABC).
Помогите, пожалуйста?
Помогите, пожалуйста!
На языке Pascal решить данное выражение.
Заранее спасибо!
Решите пожалуйста задачу на языке pascal?
Решите пожалуйста задачу на языке pascal.
Вы перешли к вопросу Pascal Помогите пожалуйста?. Он относится к категории Информатика, для 10 - 11 классов. Здесь размещен ответ по заданным параметрам. Если этот вариант ответа не полностью вас удовлетворяет, то с помощью автоматического умного поиска можно найти другие вопросы по этой же теме, в категории Информатика. В случае если ответы на похожие вопросы не раскрывают в полном объеме необходимую информацию, то воспользуйтесь кнопкой в верхней части сайта и сформулируйте свой вопрос иначе. Также на этой странице вы сможете ознакомиться с вариантами ответов пользователей.
Program Project1 ;
{$APPTYPE CONSOLE}
{$R * .
Res}
uses System.
Math, System.
SysUtils ;
Var n, x, k : Integer ; S : Extended ;
begin try { TODO - oUser - cConsole Main : Insert code here } S : = 0 ; Write('Введите n : ') ; Readln(n) ; Write('Введите x : ') ; Readln(x) ; for k : = 1 to n do S : = S + (Power(x, Power(k, x)) / k) ; Writeln('Сумма = ', S) ; except on E : Exception do Writeln(E.
ClassName, ' : ', E.
Message) ; end ; Readln ;
end.