Pascal ABC В диапазоне от 1 до К вывести все нечётные числа Помогите пожалуйста (( - №22999227

Pascal ABC
В диапазоне от 1 до К вывести все нечётные числа Помогите пожалуйста ((
- Предмет:
  Информатика
- Автор:
  godiva
- 5 лет назад

Ответы 1

//PascalABC.Net 3.2beginfor var i:=1 to readinteger ('Введите K: ') do if (i mod 2)=1 then print (i);end.
- Автор:
  konapittman
- 5 лет назад
- 0
Добавить свой ответ

Еще вопросы

Из чего состоит пищеварительная дыхательная нервная система амфибии?
- Предмет:
  Биология
- Автор:
  laylascwv
- 5 лет назад
- Ответов:
  
  1
- Смотреть
Приведите дроби к одному из знаменателей 10,100,1000 и т.д. и запишите соответствующие десятичные дроби:
1) 1/2, 2/5, 7/5, 4/5
2) 1/4, 3/20, 8/25, 7/25, 1/50
3) 6/125, 25/250, 7/200, 9/500
4) 3 1/20, 2 3/50, 4 8/25, 7 11/20, 12 4/25, 9 13/50
Образец: 9/25=9/5×5=9×2×2/5×5×2×2=36/100=0,36
- Предмет:
  Математика
- Автор:
  mireya7h7s
- 5 лет назад
- Ответов:
  
  3
- Смотреть
как составить предложение шататься пол ходит под ногами?
- Предмет:
  Русский язык
- Автор:
  samaraw2nw
- 5 лет назад
- Ответов:
  
  0
- Смотреть
Какие вопросы решало народное собрание в Японии?
- Предмет:
  История
- Автор:
  ruffevowx
- 5 лет назад
- Ответов:
  
  0
- Смотреть

How much to ban the user?

1 hour 1 day 100 years