Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
valerea0
27.04.2020 05:08 •
Информатика
Решить по информатике! найдите произведение первых десяти нечетных чисел. программа в паскале и, желательно, блок-схема. заранее .
Ответ:
simalivevl
06.10.2020 11:40
Pascal:
Var
A:byte;
P:real;
Begin
P:=1;
For A:= 0 to 9 do
P:=P*(A*2+1);
For A:= 0 to 8 do
Write(A*2+1,'*');
WriteLn((A+1)*2+1,' = ',P)
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
Mom34
16.04.2020 23:00
Напишите программу с формулы и запишите формулу, используя правила записи pascal: s=(a2 +b)h/2(a-b)+4...
kostynbai
15.04.2020 03:00
Исполнитель чертёжник перемещается на координатной плоскости, оставляя след в виде линии. чертёжник может выполнять команду сместиться на (a, b) (где a, b – целые числа), перемещающую...
Dyadya11
02.09.2020 21:27
Где ошибка? вот : из пункта а в пункт б движется велосипедист с постоянной скоростью v км/ч. через 1.5 часа после его старта из пункта а стартовал второй велосипедист, который двигался...
оля20121
27.11.2022 21:35
Чему окажутся равны элементы этого массива после выполнения фрагмента программы? программа на pascalе for i: =0 to 9 do a[i]: =i+1 t: =a[0] for i: =0 to 9 do a[i-1]: =a[i] a[9]:...
nadezda19831
27.11.2022 21:35
)для чего предназначены программные продукты (пп)? что понимают под образовательными информационными ресурсами? перевести десятичные числа в двоичную,восьмеричную и 16-ричную.системы...
dinamis05
05.02.2021 20:34
Составить блок-схему. program lol; uses crt; const nmax=20; //максимальный размер матрицы var a: array[1..nmax,1..nmax] of integer; //тип матрицы n,m,i,j: byte; //переменные - размеры...
unikornio
05.02.2021 20:34
Паскаль. составьте программу вычисления в массиве a(n) произведения четных элементов. массив сформировать с генератора случайных чисел....
Sagidanovadi
03.12.2020 04:03
1) в книге excel создайте таблицу, содержащую следующие данные. культура посевная площадь, га валовой сбор, т урожайность, га гречиха 2000 60 000 кукуруза 1000 15000 подсолнечник...
Queen102938
03.10.2021 22:55
Какой объем видеопамяти необходим для хранения 2 страниц изображения при условии, что разрешающая монитора равна 640×480 точек, глубина цвета = 24....
yekaterinak977
03.10.2021 22:55
Построение алгоритма и его реализация в среде visual basic для следующей : ученик выполнил работу. в зависимости от количества ошибок в работе ученика необходимо выставить соответствующую...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Var
A:byte;
P:real;
Begin
P:=1;
For A:= 0 to 9 do
P:=P*(A*2+1);
For A:= 0 to 8 do
Write(A*2+1,'*');
WriteLn((A+1)*2+1,' = ',P)
End.