Частина тексту файла (без зображень, графіків і формул):
Міністерство освіти та науки України
Вінницький національний технічний університет
Інститут інформаційних технологій та комп'ютерної інженерії
Кафедра комп'ютерних наук
Лабораторна робота № 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, створила програму, яка визначає трикутники по довжинах трьох сторін.
Ви не можете залишити коментар. Для цього, будь ласка, увійдіть
або зареєструйтесь.
Ділись своїми роботами та отримуй миттєві бонуси!
Маєш корисні навчальні матеріали, які припадають пилом на твоєму комп'ютері? Розрахункові, лабораторні, практичні чи контрольні роботи — завантажуй їх прямо зараз і одразу отримуй бали на свій рахунок! Заархівуй всі файли в один .zip (до 100 МБ) або завантажуй кожен файл окремо. Внесок у спільноту – це легкий спосіб допомогти іншим та отримати додаткові можливості на сайті. Твої старі роботи можуть приносити тобі нові нагороди!