Подякувати Студентському архіву довільною сумою
Admin
26.02.2023 12:38
Дякуємо, що користуєтесь нашим архівом!
Організація введення-виведення інформації. Вивчення стандартних типів даних.
Інформація про навчальний заклад
ВУЗ:
Національний університет Львівська політехніка
Інститут:
Інститут комп’ютерних наук та інформаційних технологій
Факультет:
Не вказано
Кафедра:
Програмного забезпечення (ПЗ)
Інформація про роботу
Рік:
2006
Тип роботи:
Лабораторна робота
Предмет:
Основи програмування та алгоритмічні мови
Група:
КН-1
Варіант:
12
Частина тексту файла (без зображень, графіків і формул):
Міністерство освіти та науки України
Національний університет «Львівська політехніка»
Інститут комп’ютерних наук та інформаційних технологій
Кафедра ПЗ
З В І Т
Лабораторна робота № 4
з курсу «Основи програмування та алгоритмічні мови»
Тема. Організація введення-виведення інформації. Вивчення стандартних типів даних
Варіант №12
Виконав: ст. гр. КН-1
Львів-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.
Протокол роботи програми :
Висновок:
На даній лабораторній роботі я засвоїв найпростішу структуру програми і
оержав навики організації введення-виведення значень стандартних типів даних.
Ділись своїми роботами та отримуй миттєві бонуси!
0%
Оголошення від адміністратора