Войти Регистрация Спроси ai-bota

Var n, j: integer; a: real; begin readln(n,a); s: =0; for j: =0 to n do s: =s+1/(exp(2nln(; writeln(s); end. напишите программу на языке qbasic

Ответ:

эльза182

03.10.2020 05:01

INPUT n, a
s = 0
FOR j = 0 TO n
s = 1 / a ^ (2 * n)
NEXT j
PRINT s

0,0(0 оценок)

Популярные вопросы: Информатика

Dashakon58

28.01.2022 17:24

Проделайте несколько операций с массивом Array. 1. Найдите сумму всех элементов массива (S).2. Найдите произведение всех элементов массива (Р). информатика. Заранее...

TopGmaer

25.01.2021 11:44

запишите в развернутом виде следующие числа: a^10=2335,75a^16=819a^18=541a^2=111010...

Astr4lis

08.10.2020 00:08

Вариант 11. представьте в виде построчной записи алгоритм решения следующей .фруктовый магазин продает яблоки поштучно по 10 руб., груши — по 20 руб., апельсины — по...

kolakao

18.09.2021 23:41

Сколько цветов в палитре растворового рисунка,если на кодирование каждого пикселя отводиться 9 бит...

AllRay1

18.09.2021 23:41

Напишите следующее высказывание в виде логических выражений: голова думает тогда и только тогда, когда язык отдыхает....

almikhaylova

18.09.2021 23:41

Сколько байт выделяется на кодирование одного пикселя для хранения 65 536-цветного изображения...

nshexovceva18

18.09.2021 23:41

Какое количество цветов допустимо в палитре если на кодирование одного пикселя изображения выделяется 2 байта?...

51Qwerty15

25.11.2021 08:54

Как называется устройство, обеспечивающее обмен информацией с контроллерами периферических устройств?...

Kevand

25.11.2021 08:54

Запиши римскими цифрами: 14 век. на клавиатуре...

ОлегВолгин228

25.11.2021 08:54

Для перемещения в начало следующей страницы необходимо нажать alt+ctrl+page down ctrl+end ctrl+page up alt+ctrl+page up ctrl+page down ctrl+home...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку