Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
isxakovravil82p0c2e4
26.08.2020 01:25 •
Информатика
Надо найти произведение чисел от 1 до 10 в pascal abc.
Ответ:
маринэджан
17.07.2020 16:28
Var p,i:integer;
begin
p:=1;
for i= 1 to 10 do
p:=p*l
writeln(p);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Dasha20101111
05.01.2021 14:22
Сколько времени потребуется для передачи файла объемом 24 576 Кбайта, если скорость передачи 4 Мбайт/с?...
Мен234
05.12.2022 04:56
«Нигериялық хатты» қалай тануға болады? берем...
GB001
24.01.2021 11:45
4 кезеңде вакуумды түтіктердің орнына...
EvgeshaKhomenco2005
20.04.2022 09:00
Делать нужно в Python! 4. Запишите программу, которая вычисляет S по формуле: S = (1/2) + (2/2) + (3/2) + (4/2) +…+ (n/2)...
Одуванчик11111111
12.08.2020 05:06
ПРОГРАММИРОВАНИЕ НА ТЕМУ (ПАЙТОН) Напишите программу, которая решает следующую задачу. Ввести целое число. Вывести это число,. увеличенное в 11 раз. Ввод и вывод данных...
Tori163
19.12.2020 18:39
Напишите программу для вычисления значения выражения: ...
Мαлинкα
04.12.2020 03:10
Цикл с пред условием или с пост условием , можно выбрать любой вывести на экран все чётные числа расположенные между числами n и m. если что 8 - 9 класс...
lera1062
14.05.2022 05:35
180 181 ВОПРОСЫ 23 25 28 31 32 33 37 38 40 СУХИХ 5 КЛАСС...
asdsssssssssss124
08.11.2021 02:46
НАПИСАТЬ СОЧИНЕНИЕ КАКОЙ ПОСТУПОК Я СЧИТАЮ ПОДВИГОМ? НА ОСНОВЕ ПРОИЗВЕДЕНИЯ ДАНКО (СТАРУХА ИЗЕРГИЛЬ)БУДУ ОЧЕНЬ РАД...
школа433
11.12.2022 06:08
очень надо завтро впр по этому кто ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
p:=1;
for i= 1 to 10 do
p:=p*l
writeln(p);
end.