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

Цикл for(pascal) решить при этого цикла: напечатать все нечетные числа от 3 до 25

Ответ:

Telman07

06.07.2020 18:03

Var a:integer;
begin
for a:=3 to 25 do
begin
if (a mod 2 =1) then writeln(a);
end;
end.

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

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

Nellimaer17

20.02.2022 01:02

Здравствуйте правильно ответить на во...

Okladakey

19.02.2021 03:35

Напишите программу, которая по введенному пользователем натуральному числу n(n 100) выводит на экран следующую сумму: 1^2+2^2+3^2+⋯+n^2 Для вычисления суммы должен использоваться...

Алалутала

29.09.2021 20:25

Здравствуйте правильно ответ на во Какие электронные версии казахских национальных игр можно найти в интернете?...

danisdigger

20.01.2021 04:41

Задание по оператору for. Напечатать свое имя, столько раз сколько тебе лет. ...

KÖT8953

30.12.2021 18:19

Что такое “производство аудиовизуальных программ и передач”?...

03Faridm1

30.08.2021 10:45

Скретч - этоязык общенияязык программированиясреда программированияинформационное устройствонастольная программа...

feyaandkisa

29.05.2023 14:11

Класифікація копютерних мереж...

leyla623

19.08.2020 21:20

ОЧЕНЬ НАДО ДО 10 ВЕЧЕРА соль | перец 4000 перец 1600 соль & перец 300 какое количество страниц (в тысячах) будет найдено по за соль? считается, что все за выполнялись практически...

venzelvika

11.10.2021 23:30

1) Какое значение будет принимать переменная Y после выполнения фрагментов программы? a) Var Y, X: integer; Begin Y: = 1; X: = 12; Repeat Y: = Y*X; X: = X – 2; Until X 7; Writeln...

ARMY2002

03.02.2021 22:11

На скільки сильний вплив ЗМІ на населення? Який б розповсюдження інформації на вашу думку є найбільш безпечний?...

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

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