Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
ТРПО.doc
Скачиваний:
0
Добавлен:
01.07.2025
Размер:
3 Мб
Скачать
☆

(

Приложение в

продолжение

обязательное)

Рисунок В.1 — главное окно системы программирования Delphi 7

Рисунок В.2 — инспектор объектов системы программирования Delphi 7

Рисунок В.3 — главная форма системы программирования Delphi 7

Приложение Г

(

Приложение в

продолжение

обязательное)

Рисунок Г.1 — схема процедуры начальной подготовки FormCreate

Рисунок Г.2 — схема взаимодействия процедуры начальной подготовки FormCreate

Приложение Е

(

Приложение в

продолжение

обязательное)

Рисунок Е.1 — исполняемый файл программы PrincElf.exe

Рисунок Е.2 — иконка исполняемого файла программы PrincElf.exe

Рисунок Е.3 — главное окно программы

Рисунок Е.4 — изменение главного окна после нажатия кнопки «Да, я помогу тебе, принц»

Рисунок Е.5 — изменение кнопки

Рисунок Е.6 — правильно написанная программа

Рисунок Е.7 — полоса прогресса

Рисунок Е.8 — сообщение о победе

Рисунок Е.9 — крестик в правом верхнем углу окна

Приложение Ж

(

Приложение в

продолжение

обязательное)

Фрагмент текста, содержащего полуфабрикаты с отмеченными позициями фасетов для формирования заданий

спросить и ввести числа #E и #A, вычислить и вывести #C=#E+#A (магия Си)

float #E;

float #A;

float #C;

printf("#E=");

scanf("%f",&#E);

printf("#A=");

scanf("%f",&#A);

#C=#E+#A;

printf("#C=%5.2f/n",#C);

спросить и ввести число #C, если оно >#A, то вывести "+", иначе "-" (магия Паскаль)

const

#A = #X;

var

#C : real;

Write('#C=');

ReadLn(#C);

if (#C>#A)

then begin

WriteLn('+');

end

else begin

WriteLn('-');

end;

спросить и ввести число #C, если оно >#A, то вывести "+", иначе "-" (магия Бейсик)

#A = #X

Dim #C as Single

Print "#C=";

Input "",#C

if (#C>#A) then

Print "+"

else

Print "-"

end if

ЛИСТ РЕГИСТРАЦИИ ИЗМЕНЕНИЙ

Номер изме-нения

Номер листа

Всего листов в документе

ФИО и подпись ответственного за внесение изменения

Дата внесения изменения

Дата введения изменения

измененного

замененного

нового

изъятого

40