Вариант 7
1. Начертите фигуру, изображенную на рисунке, используя алгоритм с циклом.
(там ступеньки в нижний левый угол)
2. Начертите фигуру, изображенную на рисунке, используя вс алгоритм рисования отдельного элемента.
(что-то типа трапеции с треугольником внутри)
3. Начертите фигуру, изображенную на рисунке, используя переменные в цикле для.
(треугольник с полосками в верхний правый угол)

program zadacha;

uses crt;

var otvet: real;

begin

otvet: = ((4785**45*45))/50;

writeln(otvet: 5: 5);

readkey;

end.

блок схема,в jpeg формате (картинка ) сделана в word 2007.у вас ошибка составление программы (var max,x,e: real; ) [хотя вы запрашиваете x,y]

картинка загружаться не хочет =),на сайт.

зеркало

9 кбатй = 73728 бит (кбайт=8192 бит)

73728/1536=48сек

512*48=24576бит=3072 байт ( 1 байт = 8 бит)

var s1, s2: string;

begin writeln('введите строку'); readln(s1); writeln('введите слово'); readln(s2); writeln('позиция слова в строке'); writeln(pos(s2, s1)); end.