Задать вопрос
27 декабря, 08:42

Pascal

вычислить сумму 1^4+2^4 + ... + N^4 (while, repeat until или For)

+2
Ответы (1)
  1. 27 декабря, 08:50
    0
    Program al;

    var n, i, s:integer;

    begin

    writeln ('vvedite n = ') ;

    readln (n) ;

    s:=0;

    for i : = 1 to n do

    s:=s+sqr (i) * sqr (i) ;

    writeln ('s=', s) ;

    readln;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Pascal вычислить сумму 1^4+2^4 + ... + N^4 (while, repeat until или For) ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
1) Какие операторы используются для организации циклов? a) while условие until; b) repeat until условие; c) while условие do; d) repeat do условие.
Ответы (1)
Определить значение переменной у после выполнения следующих фрагментов программы: a) Var у : real; i : integer; у : = 1; i : = 5; while i> 2 do i: = i - 1; y:=y + 1 * i; b) Var у : real; i : integer; у : = 1; i : = 2; repeat i: = 2 * i;
Ответы (1)
1) Вычислить длину окружности и площадь круга одного и того же заданного радиуса R. Pascal (желательно с блок-схемой) 2) Найти сумму членов арифметической прогрессии, если известны её первый член, знаменатель и число членов прогрессии Pascal
Ответы (1)
Как описывают переменные в Pascal? Какие стандартные числовые типы языка Pascal вам известны? Что вам известно о соответствии типов переменных в языке Pascal? Какие арифметические операции можно выполнять в Pascal?
Ответы (1)
Помогите Найти и объяснить ошибки п/п Пример Ответ Пояснения 1 for i=1 to n do; 2 for i:=n to 1 do 3 for i=1 to n do step 1 4 while a < 5 do; a:=a+1; b:=b+a; 5 Repeat a < 5 a:=a+1; b:=b+a; until; 6 while c < k or k = 0 do 7 while c < k s:=s+k;;
Ответы (1)