Как создать программу на Pascal ABC. Простейший калькулятор на Паскале
Программы » СтатьиЗдравствуйте, начинающие программисты! Из данной статьи вы узнаете как создать программу на Pascal ABC, например, простейший калькулятор.
Заходим в программу Pascal ABC, перед нами открывается чистый лист с названием Program1.pas - это файл программных модулей для написания кода. В дальнейшем его можно компилировать в .exe - исполняемый файл, который будет открывать созданную нами программу.
Для начала назовём нашу программу, к примеру, «Решебник», в коде пишем:
Program reshebnik;
Не забывайте в конце каждой строчки обязательно ставить точку с запятой. Так как мы создаём простейший калькулятор, наш «Решебник» будет вычислять буквально одно действие - сложение двух переменных, то есть a+b=c. Во второй строчке кода объявляем переменные a, b, c и добавляем integer (с англ. - «целое») - уточнение, что a, b, c - целые числа:
Var a, b, c: integer;
Var - в языках программирования означает «переменная».
Теперь создадим блок команд (операторов), который начинается со слова begin и заканчивается словом end. Пишем:
begin
Следующей сторочкой предложим пользователю ввести число. Инструкция Write (с анг. - «запись») выведет на экран монитора наше сообщение, WriteLN - ещё и переведёт курсор в начало следующей стороки, то есть пишем в файле четвёртой строчкой:
WriteLN ('Введите число A:');
Пятой строчкой выполним ввод пользователя с помощью команды read (с англ. - «читать»):
ReadLN (a);
То же самое проделаем со вторым числом b:
WriteLN ('Введите число B:.');
ReadLN (b);
Выполняем подсчёт введённых переменных. Знак «:=» означает присваивание, присваиваем числу c значение a+b:
c := a+b;
Выводим ответ и завершаем блок операторов:
WriteLN ('Ответ', c);
end.
Итак, наш «Решебник» готов к использованию. Проверим, как он работает. В Верхнем меню программы Pascal ABC выбираем Программа -> Выполнить.
Program reshebnik;
Var a, b, c: integer;
begin
WriteLN ('Введите число A:');
ReadLN (a);
WriteLN ('Введите число B:');
ReadLN (b);
c := a+b;
WriteLN ('Ответ', c);
end.
Вот и все. Надеюсь, всё понятно. Желаю удачи и хороших результатов!
Дата публикации: 2011-08-16
Опубликовал:Н.Волков
Последний раз редактировалось:2021-10-28