Как вывести четные и нечетные числа от 1 до 100 в Pascal ABC

Как вывести четные и нечетные числа от 1 до 100 в Pascal ABC
Числа

Если Вам вдруг понадобились четные либо нечетные числа, а писать их вручную не хочется, то можно воспользоваться старым добрым паскалем АБС. В этой статье я покажу простой способ, как написать программу, которая сможет вывести четные либо нечетные числа до 100, либо до любого другого числа.

Инструкция

Уровень сложности: Несложно

Что вам понадобится:

  • Pascal ABC
  • Небольшие навыки программирования

1 шаг

Как вывести четные и нечетные числа от 1 до 100 в Pascal ABC
Оформление

Откройте Pascal ABC и напишите стандартное оформление. Вот структура обычной программы в Pascal ABC:
var a,b:integer; (раздел переменных)
begin (начало программы)
(тело программы)
end. (конец программы)

2 шаг

Как вывести четные и нечетные числа от 1 до 100 в Pascal ABC
Программа

Далее в теле программы нам нужно написать: «a:=1;» и команду «for». В команде «for» после «do» идет подпрограмма. Оформляется она так же, как и сама программа, только после «end» ставится не точка, а точка с запятой.
Нам нужно, чтобы подпрограмма сработала определенное количество раз. Если нам нужно, чтобы подпрограмма выполнилась 100 раз, то задаем в команде «for» вот это: for b:=1 to 100 do.
Теперь напишем подпрограмму. Пишем следующее:
a:=a+2;
write(‘,’,a);

3 шаг

Как вывести четные и нечетные числа от 1 до 100 в Pascal ABC
Нечетные числа

В итоге у нас получилась вот такая программа:
var a,b:integer;
begin
a:=-1;
for b:=1 to 100 do
begin
a:=a+2;
write(‘,’,a);
end;
end.
А теперь немного объясню, как она работает. Сначала мы присваиваем переменной а число -1. Далее оператор «for» выполняет подпрограмму, которая в свою очередь прибавляем к переменной число 2 и выводит полученное число на экран вместе с запятой. Получается вот так: «-1+2=1» и программа выведет на экран следующее: «1,». Теперь переменная а равна 1. Теперь подпрограмма сработает еще раз: 1+2=3 и программа выведет «3,». И так 100 раз. В итоге с каждым рабом на экране будет все больше нечетных чисел и в конце программы мы получим набор нечетных чисел через запятую.

4 шаг

Как вывести четные и нечетные числа от 1 до 100 в Pascal ABC
Четные числа

Чтобы получить четные числа, вместо нечётных, нужно поменять значение переменной а в начале программы на 0.

Обсуждение

Ваш комментарий

Запросить инструкцию

Не нашли нужную пошаговую инструкцию?
Возможно, что кто-то из посетителей сайта сможет помочь. Оставьте запрос прямо сейчас, если Вы уверены, что эта тема ещё не освещена на нашем проекте!

Рейтинг
  1. +
  2. 0
0
1