Частина тексту файла (без зображень, графіків і формул):
Міністерство освіти та науки України
Вінницький національний технічний університет
Інститут інформаційних технологій та комп'ютерної інженерії
Кафедра комп'ютерних наук
Лабораторна робота № 1
на тему: Основи розробки програмного забезпечення за допомогою мови програмування Pascal.
Мета: Вивчення основної структури мови програмування Pascal.
Завдання: Визначення типу трикутнику по довжинам трьох сторін.
Код програми:
Program Treugolniki;
uses crt;
var a,b,c:integer;
begin
clrscr;
Writeln('Vvedit a,b,c:');
Readln(a,b,c);
if (a>b+c) or (c>a+b) then
Writeln('Eto ne treugolnik')
else
if sqr(a)+sqr(b)=sqr(c) then
Writeln('Eto pryamougolniy treugolnik')
else
if (sqr(a)+sqr(b)>sqr(c)) and (sqr(a)+sqr(c)>sqr(b)) and (sqr(c)+sqr(b)>sqr(a))
then
Writeln('Eto ostrougolniy treugolnik')
else
Writeln('Eto tupougolniy treugolnik');
Readln
End.
Тестування програми:
/
/
/
/
Висновок:
Під час проведення лабораторної роботи, я ознайомилася з основною структурою мови Pascal, створила програму, яка визначає трикутники по довжинах трьох сторін.