Моделирование работы с базой данных в Pascal. - Turbo Pascal

Узнай цену своей работы

Формулировка задачи:

Записи о пяти учебниках в библиотеке(предмет,автор,класс,количество). Определить число учебников математики для 5-го класса.

Решение задачи: «Моделирование работы с базой данных в Pascal.»

textual
Листинг программы
program xakerGT;
var a,b: string;
i,d,c,h: integer;
begin
h:=0;
for i:=1 to 5 do
begin
writeln ('предмет (с большой буквы)? ');
readln (a);
writeln (' автор? ');
readln (b);
writeln (' класс? ');
readln (c);
writeln (' сколько?');
readln (d);
if ((a='Математика') and (c=5)) then
h:=h+d;
end;
writeln ('учебников по мат 5-ого ',h );
readln;
end.

Объяснение кода листинга программы

  1. Программа xakerGT написана на языке Turbo Pascal.
  2. В программе используются следующие переменные:
    • a, b: строковые переменные для хранения ответов пользователя.
    • i, d, c, h: целочисленные переменные для выполнения операций.
  3. Переменная h инициализируется значением 0 и используется для подсчета количества учебных пособий.
  4. В основной цикл программы (for) выполняется пять итераций, на каждой из которых пользователю предлагается ввести данные о предмете, авторе, классе и количестве учебных пособий.
  5. Если введенные данные удовлетворяют условиям (предмет = Математика и класс = 5), то значение переменной h увеличивается на количество учебных пособий.
  6. После завершения цикла программа выводит сообщение о количестве учебных пособий по математике для 5 класса.
  7. Программа завершается после нажатия клавиши Enter.

Оцени полезность:

12   голосов , оценка 4.083 из 5
Похожие ответы