Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
dggkfuh
07.04.2020 03:35 •
Информатика
Вычислить: у=1×3×5××(2n-1),n> 0. написать программу( циклический алгоритм).
Ответ:
daniil539
01.10.2020 20:16
На buttonclick пишешь
var n:integer;
begin
label1.caption:='1';
for n:=1 to 50 do
label1.caption:=floattostr(strtoint(label1.caption)*(2n-1))
0,0
(0 оценок)
Популярные вопросы: Информатика
BOGDANGER
20.03.2021 11:41
Microsoft excel каково максимально допустимое число функций если, вложенных одна в другую?...
ytaaa1999
20.03.2021 11:41
Microsoft excel? как с панели инструментов «стандартная» быстро определить, сколько в выделенном диапазоне находится ячеек, содержащих числа? какая формула будет...
alinarynkevich2007
20.03.2021 11:41
Перевести цифры 4095, 123,456, 1024 в цифровую форму...
lebedevamilp00sr9
20.03.2021 11:41
Сколько бит информации получено из сообщения мой друг живет на 7 этаже , если в доме 16 этажей?...
Meow100
20.03.2021 11:41
1.найти разность 31(10)-16(10) в восьмибитном представлении.прямой код, обратный код и дополнительный код. 2. представить число -292(10) в двоичном виде в шестнадцатибитном...
DimaMartolog
23.06.2022 05:53
Дан массив целых чисел от 1 до n, пусть n=15. вычислить сумму элементов с 1 по 12, и с 8 по 15, а также найти произведения этих сумм....
Salsa13
21.10.2021 18:53
Cоставьте программу для решения уравнения x^2+kx+b 0...
Map21
01.11.2021 03:36
Составить программу для нахождения цифр четырехзначного числа program n_221; var a, b, c, d, abcd: longint; что...
tytyuuh88
01.11.2021 03:36
Укажите через один пробел в порядке возрастания все основания систем счисления, в которых запись десятичного числа 3306 оканчивается на 3....
Valera7451
02.07.2020 09:39
Создать приложение. написать процедуру и функцию, которая подсчитывает количество положительных элементов в массиве и определяет наибольшую разницу между этими элементами....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var n:integer;
begin
label1.caption:='1';
for n:=1 to 50 do
label1.caption:=floattostr(strtoint(label1.caption)*(2n-1))