Умножение в паскале как пишется

Содержание

Задача

Достаточно часто требуется построить на экране какую-нибудь двумерную таблицу. Это можно реализовать с помощью двух циклов for. При этом один цикл должен быть вложен в другой.

Допустим, нам требуется вывести на экран таблицу умножения.

Решение

Внешний цикл for отвечает за формирование строк. Всего их будет 10, значит количество итераций цикла должно быть равно 10.

Внутренний цикл for формирует каждое значение в строке. Всего значений в строке 10. Значит и число его итераций должно быть 10.

В теле вложенного цикла for происходит формирование конкретного значения путем умножения текущего значения счетчика внешнего цикла на текущее значение счетчика внутреннего цикла. Поскольку на протяжении десяти итераций внутреннего цикла, значение счетчика внешнего цикла не меняется, то получается строка, где числа от 1 до 10 умножаются на одно и то же число.

После выхода из внутреннего цикла, перед следующей итерацией внешнего цикла требуется осуществить переход на новую строку. Иначе все значения будут записаны не в виде таблицы, а в виде одной строки.

Пример программы на паскаль, задача которой перемножать вещественные числа. Описание работы программы, исходный код и ссылку на скачивание готовой программы на паскаль, Вы можете увидеть далее.

Итак, устроена она довольно просто. Так как наши числа вещественные, то мы будем использовать вещественный тип данных – real. После описания и считывания переменных мы их просто перемножаем, а после выводим следующим образом: 4 позиции для целой части и 4 позиции для дробной части. Так как недавно был пройден модуль CRT в паскаль, то он используется в этой программ.

Исходный код программы паскаль:

К каждой строке написаны подробные пояснительные комментарии, что помогает лучше разобраться в структуре программы на паскале. Если же вы искали методы продвижения сайта, то их я советую прочитать тут. Прошу также обратить внимание, что если Вы используете в качестве компилятора Turbo Pascal, то необходимо убрать "//" перед в предпоследней строке.

Читайте также:  Что значит избавиться от иррациональности в знаменателе

begin
p := n * b;
writeln(‘введите первый множитель’);
readln(n);
writeln(‘введите второй множитель’);
readln(b);
writeln(”, n, ‘ умножить на ‘, b, ‘ =’, p, ”);
end.Почему ответ 0 всегда получается? Как исправить?

writeln(‘Введите первый множитель’);

writeln(‘Введите второй множитель’);

writeln(”, n, ‘ умножить на ‘, b, ‘ =’, p, ”);

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *