Вивести ціле число у горизонтальній рамці

Напишите алгоритм исполнителя чертёжник, который будет рисовать равносторонний треугольник.

Определите значение целочисленных переменных а и b после выполнения фрагмента программы: а: = 2521; b: = ((а div100)*101) mod 1000; а: = (b – (b mod 10))/10;

Укажите неправильную формулу: 1) а2+в4 2) =а1/с453 3) =с245*м67 4) =о89-к89

На вход программе строчные буквы. ввод этих символов заканчивается точкой, другие символы, отличные от точки и букв, во выходных данных отсутствуют. требуется написать эффективную программу, которая будет печатать в алфавитном порядке только те буквы, которые ровно три раза встретились во входной
последовательности. каждая буква должна быть распечатана только один раз. точка при этом не учитывается. например, пусть на вход следующие символы: btfgbbffjratbamaв данном случае программа должна вывести: aftпрограмма на паскаленаписать как можно проще (использовать базовые элементы
программирования)

1. заполнить пропуски в программе так, чтобы программа выполняла : program p11; {определение максимальной и минимальной цифры в числе} var a: integer; function f(a: integer): integer; var max, x: integer; begin max: =a mod 10; while a> 0 do begin x: =a mod 10; a: =a div 10; if x> max
then max: =x; end; f: =max; end; {f} function begin end; {f1} begin write('введите число-'); writeln('минимальная цифра в числе: ',f1(a)); end. 2. протестировать программу с следующей таблицы: а= ответ а= ответ а= ответ а= ответ 15463 5689 4752 23102 уп по информатике
"программирование на языке паскаль" 141 3. ответить на вопрос: сколько и локальных переменных используется в данной программе?