Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
kisskaaa123
24.10.2020 20:31 •
Информатика
Составить программу, которая находит произведение всех натуральных чисел от 1 до 4 (для приложения паскаль)
Ответ:
Cat4ik
10.06.2020 14:18
Объяснение:
var s,i:integer;
begin s:= 1;
for i:= 1 to 4 do begin
s:=s*i;
end;
write(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
SpaniGar
29.12.2020 23:14
Чому число 1, 001, 101, 101.001, 001, 01 не може бути двійково десятковим...
prostoliii
17.07.2022 00:21
10. С какой целью используется двоичная система кодирования: для выполнения арифметических операций для выполнения логических операций для кодирования графической...
ааnell714
03.04.2023 01:15
Графічними є такі об єкти текстового документа 1.слово2.схема/діаграма3.малюнок4.фотографія...
образец
08.12.2022 00:54
Запиши развёрнутую запись числа 0,245 для дробной части числа...
ksyu5551
23.08.2021 04:10
Вычислите дробную часть среднего трех заданных вещественных чисел. программа в бейсике....
Викуля151515
24.10.2022 08:56
Алинуру необходимо отправить несколько файлов на съемный диск. Объем свободной памяти 100 МБ. Объем отправляемой информации больше 100 МБ. Он пользуется программой...
sanyok505
09.08.2020 15:21
Определите количество символов в сообщении, алфавит которого состоит из 64 символов, информационный объем равен 1242 бит...
SonyaCarrol
21.01.2021 07:19
Какая из величин больше 110% цены? а1,02 цены б0,11 цены в0,12 цены...
AbrikosiK11
21.01.2021 07:19
Что называется , от чего она зависит, примеры...
лобарант
21.01.2021 07:19
13 кроликов 5 кг маркови каждому по 4 марковки сколько морковок осталось если в каждом кг по11 морковок?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Объяснение:
var s,i:integer;
begin s:= 1;
for i:= 1 to 4 do begin
s:=s*i;
end;
write(s);
end.