Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
МихаилКузмичёв
14.08.2020 06:23 •
Информатика
Pascal. составить программу. найти сумму 12 натуральных чисел кратных 22.
Ответ:
Denaz
09.10.2020 06:12
var n,a:integer;
begin
n:=22;
for a:=1 to 11 do
begin
n:=n+22;
end;
writeln(n);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
muralova
24.02.2020 22:29
Даны логические выражения G и R. Каждое выражение состоит из 9 переменных. Для выражений G и R составлены таблицы истинности, где есть 9 одинаковых строк, в которых в столбце...
Diamond1111111
30.10.2022 15:19
Чему в новом массиве равно значение первого элемента?...
vlad200883
25.09.2021 14:30
Найди такое двузначное значение для переменной xx, чтобы после выхода из цикла переменная s s стала равна 18:18: s = 0 пока x 0 b = b + (x mod 10) x = x div 10...
aniavetisa
14.09.2022 05:41
Как выразить словами блок с ветвлением...
бабушка111111
14.06.2022 21:11
Что такое пакетная арифметика?...
PоLinaKozloVa
22.05.2022 19:55
Программа Excel это А) текстовый редакторВ) электронная таблицаС) система управления базами данныхD)графический редакторE)программа проектирования приложений...
ВикаФан
13.01.2023 22:53
Среда исполнителя чертежник координатная прямая координатная плоскость координатный луч...
Джеффл1
23.05.2023 00:05
Создать программу для перевода чисел из двоичной в десятичную систему счисления. Паскаль....
Ізабель
21.10.2021 15:23
НУЖНО СДЕЛАТЬ Посмотри внимательно на описания. Как называются системы счисления, о которых идет речь? Какая из систем счисления в данном случае является лишней и почему (1...
Samina7161
03.07.2020 06:59
Как Снежная королева решила отомстила мальчику...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var n,a:integer;
begin
n:=22;
for a:=1 to 11 do
begin
n:=n+22;
end;
writeln(n);
end.