Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
ns151199
10.11.2021 05:53 •
Информатика
Вывести на экран в столбик, начиная с 2, четные числа. количество четных чисел вводит пользователь с клавиатуры. начертить блок-схему, написать программу к в тетради! например, если пользователь ввел 4, то на экране должно быть следующее 2 4 6 8
Ответ:
Мороженка1111111
05.07.2020 23:59
Uses crt;
var i,k:integer;
begin
readln(k);
for i:= 1 to k+k do
if (i mod 2=0) then
writeln(i);
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
SQQQUAD
04.08.2020 04:15
Написать столбиком все целые числа 20 до 35 и вычислить их корни...
katy994
02.05.2023 22:36
Составьте линейную программу для изображения исполнителя стрелочка рисунка улитка...
андрей100500ый
04.12.2020 12:20
C++. напишите программу, которая выбирает максимальное и минимальное из пяти введённых чисел....
нина655
04.12.2020 12:20
Составить блок-схему: заменить все отрицательные элементы массива на ноль....
kjgftgv
04.12.2020 12:20
Составить блок-схему. в заданном целочисленном массиве определить максимальный среди элементов, стоящих на четных местах....
daniil14537
01.05.2020 10:16
Двоичная восьмеричная десятеричная шеснадцатеричная 110101 247 261 4ас заполните таблицу и решение !...
Дари233
02.02.2020 11:32
Перевод: түйін түю; құйма әдістері; әшекей заттары; ғарыштық ой жүйесін; бедерленген; құмыра....
arturdadayan
08.07.2021 03:02
Вкабинете при температуре 20 °с абсолютная влажность воздуха равна 8,5 гм3. определите относительную влажность воздуха. плотность насыщенного воздуха равна 17,3 гм3. (ответ округлите...
raykyoko
29.03.2023 00:46
Составит формулу углеводорода по названию 2,2,3-3 метин гептан...
Leraleralera151515
09.08.2021 23:21
Номер 569 дорофеев петерсон 6 класс скиньте начало а) (-0,864:...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var i,k:integer;
begin
readln(k);
for i:= 1 to k+k do
if (i mod 2=0) then
writeln(i);
readln;
end.