< >

Решить в PascalABC
С помощью цикла for вывести последовательность нечётных чисел от 1 до 10.

Ответы

Ответ дал: lexa23072003
0

var i :integer;

begin

for i:=1 to 10 do

if i mod 2  <> 0  Then writeln(i);  

end.

Похожие вопросы
Английский язык
1 год назад
Биография на английском любого человека вошедший в историю России например суворова
Английский язык
1 год назад
Напишите пару слов о хоби(футбол) на английском
География
2 года назад
Написать помилки!! пжжжжжжжж​
Английский язык
2 года назад
Put the verbs in brackets into the Present Simple, the Present Continuous, the Present Perfect or the Present Perfect Continuous Tense. 1) ... you ... (to go) to the concert next Sunday, Julia? —
Математика
8 лет назад
Прямоугольник абвг разбит на квадраты длина стороны самого маленького квадрата равна 1 сантиметр чему равен периметр прямоугольника?
Алгебра
8 лет назад
составить и решить систему уровнени ,для 11 классов купили 30 билето в театр по 10 руб. и по 15руб за билет за все билеты заплатили 390руб. Сколько было куплено билетов по10 руб. и по 15руб.
Математика
9 лет назад
помогите решить уравнение
Алгебра
9 лет назад
3(x+5)-x квадрат=(2-x)(2+x)