Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
приветпрррррр20246р
30.01.2021 12:04 •
Информатика
Запишите на языке паскаль программу которая перемножает числа от 1 до 10 и выводит на экран полученный результат
Ответ:
MrHelpOnline
05.10.2020 10:33
Program n1;
var i,p: integer;
begin
p:=1;
for i:=1 to 10 do p:=p*i;
writeln(p);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
andreyzher777
13.08.2021 13:45
Анализируем и сравниваем Сравни площадки для кегельринга и робо-сумо. Найди сходства и различия....
dimon111222
28.03.2020 14:39
Выберите правильный записи условного оператора в Python if a 0: else: print(a)else:if a 0if a b:...
renatadautova
09.03.2020 13:30
Можете объяснить как работает эта программа? Прям, что обозначает всё...
pashalol3
19.01.2023 20:09
Типы системы счисления: унарная, позиционная и непозиционная...
Коши
05.05.2022 07:18
Какое число выведет данная программа? const mas : array[1..5] of integer=(1, 2, 3, 4, 5); var mas2: array[1..5] of integer; begin mas2[1] := (mas[5] + mas[1]) mas[3]; write(mas2[1]);...
Mashka063
21.02.2023 22:09
Дано натуральное число N. Написать программу для вычисления суммы вида: 10+15+20+...+N с исползованием оператора While...
AnnA12Demidenko
23.12.2022 13:21
Тіл байлығым қазынам эссе...
misszhilinskay
29.12.2022 03:43
3. Түркі тілдері қалай жіктеледі?...
Aizek111
19.12.2022 10:47
Чи має корені рівняння х2=0...
stupid28
16.02.2021 17:09
27. Напишите числа. От 153 до 161От 425 до 436От 609 до 614От 376 до 387От 352 до 343От 291 до 286От 713 до 704От 475 до 468От 405 до 394От 1000 до 993От 837 до 848От 692 до...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var i,p: integer;
begin
p:=1;
for i:=1 to 10 do p:=p*i;
writeln(p);
end.