Войти Регистрация Спроси ai-bota

Pascal abc в диапазоне от 1 до к вывести все нечётные числа ((

Ответ:

zyla24

05.10.2020 13:39

//PascalABC.Net 3.2
begin
for var i:=1 to readinteger ('Введите K: ') do if (i mod 2)=1 then print (i);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

kirikk3

21.01.2022 15:22

1. Акти, які утверджують права та свободи людини: А) Загальна декларація прав людини; Б) Кримінальний кодекс України; В) Конституція України; Г) Конвенція про захист...

koooooooooo

17.07.2022 05:43

1. Оценить (без учета сжатия данных) объем видеоряда (без звуковогосопровождения) продолжительностью в 10 мин. Дано: размер кадра: 768*576(телевизионное разрешение),...

olesya8262

12.05.2020 02:48

Как называются программы, которые обеспечивают компонентами компьютерной системы и работу других программ? системными программами программирования прикладными программами...

Pakemongo

31.10.2021 07:33

Нужно написать предложения в превосходной форме...

aleksandr250804

30.07.2020 02:22

Табуретка упала с 1 ступеньки и сломала 1 ногу. Табуретка упала с 2 ступенек и сломала 2 ноги. Сколько ног она сломает если упадет с 3 ступенек...

alexandra152

02.09.2020 19:39

(-b^2)^3×b^2×b^4/x=b9, вместо х поставьте степень с основанием b так чтобы получилось верное равенство...

grimax98

11.06.2020 07:36

Ниже приведена фотография листа некоего растения. Выберите все верные для него характеристики. присутствует рассечение листовой пластинкидуговидное жилкование листовой...

бабушка19773

10.06.2021 11:34

Put the verbs in each sentence in the correct form and choose its meaning as in the example. Так же во всех предложениях нужно выбрать, либо - 1.Stative meaning 2....

aynuran1

15.10.2020 23:10

На писати 5 речень початок першого реченя має бути я важаю Гомер або мене вразило що Гомер або на мій погляд Гомер щось одне з цого...

Savcik

08.01.2022 19:21

Uyga vazifa. Topishmoqlarni o qing va yod oling...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку