#39;); (A, B, C);
Writeln ('Максимальним з усіх є', Max (Max (A, B), C))
End.
2) Написати програму, яка виводить на екран рядок, що складається з 20 зірочок.
Uses crt; n: integer; sterlinei: integer; i: = 1 to len do ( * ); ; ( 20 ); (n); (n);;.
3) Скласти програму з процедурами. Розмова, яких ведуть герої В«Трьох мушкетерівВ».
PROCEDURE ATOS; WriteLn ('Я - Атос');
PROCEDURE ARAMIS;
BEGIN WriteLn ('Це так само вірно, як те, що я - Араміс!')
END; PORTOS; WriteLn ('А я Портос! Я правильно кажу, Араміс?');
Aramis;
WriteLn ('Він не бреше, ваша величність! Я Портос, а він Араміс.') END;
PROCEDURE DARTANIAN;
BEGIN WriteLn ('А я все думаю, ваша величність - куди поділися підвіски королеви?');
Exit;
WriteLn ('Цікаво, що відповість король?');
Portos
END;
BEGIN
WriteLn ('Я, король Франції, питаю вас - хто ви такі? Ось ти - хто такий?');
Atos;
WriteLn ('А ти, товстун, хто такий?');
Portos;
WriteLn ('А ти що відмовчується, вусатий?');
dArtanian;
WriteLn ('Анна! Іди-но сюди!');
Halt;
WriteLn ('Аудієнція закінчена, прощайте!');
END.
Висновок
У процесі написання курсової були вивчені засоби розробки програмного забезпечення Turbo Pascal. У рамках цього проекту були вивчені методи розбиття програми на процедури. p align="justify"> У більшості випадків програми мають складнішу структуру і складаються з декількох модулів. Структура процедури або дуже схожа на структуру головної процедури, вона також містить розділ описів і розділ операторів; розділ операторів починається з BEGIN і закінчується END; (але не END. - Як у головної процедури). Єдиним новим оператором для вас буде оператор заголовка, з якого починається будь-яка процедура. Всі процедури записуються в розділі описів будь-якої іншої процедури або функції, в тому числі і головною процедури. p align="justify"> Жодна професійна програма не обходиться без процедур...
