Міністерство освіти та науки України Національний університет «Львівська політехніка» Інститут комп’ютерних наук та інформаційних технологій Кафедра ПЗ З В І Т Лабораторна робота № 4 з курсу «Основи програмування та алгоритмічні мови» Тема. Організація введення-виведення інформації. Вивчення стандартних типів даних Варіант №12 Львів-2006 Мета - засвоїти найпростішу структуру програми; 2. Одержання навиків організації введення-виведення значень стандартних типів даних. 3. Одержання практичних навиків роботи в діалоговому режимі. Завдання: Організувати введення і виведення значень даних заданих типів згідно з варіантами таблиці, надаючи їм відповідні заголовки. Постановка задачі : N вар. Цілі числа Дійсні числа Кількість символів Вивести значення логічної змінної   Кількість значень для вводу Ширина поля Кількість значень для вводу Ширина поля Кількість знаків після крапки    12 3 4 6 6 2 5 FALSE   Блок-схема алгоритму Початок Вивід Ввід діапазону r1, r2, r3, r4, r5, r6, цілих чиселл Х i1:=random(x); c1:=chr(random(255)); i2:=random(x); c2:=chr(random(255)); i3:=random(x); c3:=chr(random(255)); c4:=chr(random(255)); Ввід c5:=chr(random(255)); i3 i2 i1 Вивід Ввід діапазону c1, c2, c3, c4, c5 дійсних чиселл Х КІНЕЦЬ. r1:=random(x)+random(100)*0.01; r2:=random(x)+random(100)*0.01; r3:=random(x)+random(100)*0.01; r4:=random(x)+random(100)*0.01; r5:=random(x)+random(100)*0.01; r6:=random(x)+random(100)*0.01; program lab_4; uses crt; const l='=+=+=+=+=+=+=+=+=+=+=+=+='; var i1,i2,i3,x:integer; r1,r2,r3,r4,r5,r6:real; c1,c2,c3,c4,c5:char; b:boolean; begin clrscr; randomize; writeln('Vvedit diapazon ciluh 4usel'); readln(x); i1:=random(x);i2:=random(x);i3:=random(x); writeln(i1:4,i2:4,i3:4); writeln(l); writeln('Vvedit diapazon diusnuh 4usel ; '); readln(x); r1:=random(x)+random(100)*0.01; r2:=random(x)+random(100)*0.01; r3:=random(x)+random(100)*0.01; r4:=random(x)+random(100)*0.01; r5:=random(x)+random(100)*0.01; r6:=random(x)+random(100)*0.01; writeln(' ',r1:6:2,' ',r2:6:2,' ',r3:6:2,' ', r4:6:2,' ',r5:6:2,' ',r6:6:2,' '); writeln(l); c1:=chr(random(255));c2:=chr(random(255));c3:=chr(random(255)); c4:=chr(random(255));c5:=chr(random(255)); writeln(c1:5,c2:5,c3:5,c4:5,c5:5);writeln(l); b:=false; writeln(b); readln end. Протокол роботи програми :
Висновок: На даній лабораторній роботі я засвоїв найпростішу структуру програми і оержав навики організації введення-виведення значень стандартних типів даних.