Вопросы и ответы по информатике

Var i, N: integer; S, a, x, y: real; begin write(‘x = ‘); readln(x); S := x; if x <> 0 then begin write(‘N = ‘); readln(N); y := sqr(x); a := x; for i := 2 to N do begin a := a * y * (2 * i — 3) / (2 * i — 2); S := S + a / (2 * i — 1) end end; writeln; writeln(‘Значение суммы ‘); readln end. СРОЧНО НАЙДИТЕ ОШИБКУ В ПРОГРАММЕ!!!!!!!!
Используя стек, написать процедуру или функцию, которая заменяет все отрицательные элементы на их абсолютные значения.
Добрый вечер! Ответьте пожалуйста на вопросы теста: 1. Может ли домашний компьютер быть узлом сети? (Если «да», то при каких условиях? Если «нет», то почему?) 2. Как работает сервер-программа электронной почты?
Какой объем видеопамяти в байтах нужен для хранения изображения размером 600×350 пикселей и использующего 4-цветную палитру?
Нужно ответить на 2 задания,помогите-1) В каком из примеров параграфа больше вего слов-профессинолизмов?2)Приведите 2-3 собственных примера словесных моделей.
К новому году 4 9 классы должны развесить 805 снежинок сколько снежинок придется развесить каждому классу если известно что 9а 28 чел 9б 30чел 9в 27 чел 9г 30чел в таблице эксель
Даны действительные а,b,с,d. Получить min(a,b) + max(a,b,c) ____________________ 1+max(a,b,c,d)
1.Определить, что будет на экране после выполнения следующего фрагмента программ: Var n, k:byte; Begin N:=5; For k:=1 to n do Begin n:=n+1; Writeln(‘k=’, k,’n=’,n);end;End Помогите пожалуйста
Найдите значение выражения K+L+M в восьмеричной системе счисления,если K=20C16, L=20C 16, L=307 8, M=111111 2 Помогите пожалуйста
Решите уравнение пожалуйста!!!!! 1101 2+X 8=115 16