Подякувати Студентському архіву довільною сумою
Admin
26.02.2023 12:38
Дякуємо, що користуєтесь нашим архівом!
СТРУКТУРА, ВИКОНАННЯ ТА ВІДЛАГОДЖЕННЯ ПРОГРАМ В ІНТЕГРОВАНОМУ СЕРЕДОВИЩІ BORLAND C++
Інформація про навчальний заклад
ВУЗ:
Національний університет Львівська політехніка
Інститут:
Не вказано
Факультет:
КН
Кафедра:
Кафедра інформаційних систем та мереж
Інформація про роботу
Рік:
2016
Тип роботи:
Лабораторна робота
Предмет:
Інші
Частина тексту файла (без зображень, графіків і формул):
МІНІСТЕРСТВО ОСВІТИ І НАУКИ УКРАЇНИ НАЦІОНАЛЬНИЙ УНІВЕРСИТЕТ "ЛЬВІВСЬКА ПОЛІТЕХНІКА"
Кафедра інформаційних систем та мереж
Лабораторна робота №1
на тему
СТРУКТУРА, ВИКОНАННЯ ТА ВІДЛАГОДЖЕННЯ ПРОГРАМ В ІНТЕГРОВАНОМУ СЕРЕДОВИЩІ BORLAND C++
Львів-2016
Мета роботи: ознайомитись із середовищем Borland C++ 3.1, вивчити способи запису програм на мові Сі, ознайомитись з основними конструкціями мови Сі. Метою роботи є вивчення призначення, правил побудови та застосування засобiв препроцесорного опрацювання текстів програм на мовi Сі.
Перший рівень
Для першого рівня для всіх студентів незалежно від їх номера варіанту, необхідно набрати, запустити та оформити у звіті наступну програму для вводу, компiляцiї, вiдлагодження та виконання:
#include <stdio.h>
#include <conio.h>
main() {
float a,b;
char opr;
double result;
textbackground(RED);
clrscr();
textcolor(YELLOW);
puts(“Здiйснiть ввiд по формату: операнд1 операцiя операнд2 <Enter>”);
puts(“Для закiнчення роботи натиснiсть клавiшу Esc”);
window(1,4,80,25);
textbackground(BLUE);
clrscr();
while(cputs(“Ввiд->”),cscanf(“%f %c %f”,&a,&opr,&b)!=0) {
switch (opr) {
case ‘+’: result=a+b;break;
case ‘-’: result=a-b;break;
case ‘*’: result=a*b;break;
case ‘/’:if (b==0) { cputs(“\n\rПомилка: дiлення на нуль!!\n\r”); continue; }
else {result=a/b;break;}
default:{ cputs(“\n\rПомилка: недопустимий код операцiї!!\n\r”); continue;} }
gotoxy(20,wherey());
cprintf(“=%f\n\r”,result); }
return 0;}
Результат
На рис.1 ми бачимо результат виконання чотирьох дій.
Рис.1
2. Модифікувати навчальний приклад, поданий у даній роботі так, щоб на екран виводилась інформація про студента.
3. Створити програму, яка виводить на екран інформацію про студента в такому форматі:
#include <stdio.h>
#include <conio.h>
main() {
puts(“Mene zvut Maksym Xorkanin”);
puts(“Meni 17 rokiv”);
puts(“Na osinij sesiyi ya otrymav taki ocinky:”);
puts(“Informatyuka – 4”);
puts(“Mat.analiz – 4”);
puts(“Ukr. mova – 4”);
getch();
return 0; }
Результат
На рис.2 ми бачимо екран на якому виводиться особиста інформація студента.
Рис.2
Другий рівень
Набрати (або скопіювати) наведений у роботі текст програми „SNAKE”.
/*************************************************************/ /* ІГРОВА ПРОГРАМА “SNAKE” */ /*************************************************************/ /*
#include <stdio.h>
#include <conio.h>
#include <math.h>
#include <dos.h>
#include <stdlib.h>
#include <time.h>
#define GameTime 30
#define Speed 900
struct w {char x,y;
struct w *next;
struct w *before; };
void cursor_off(void);
cursor_on(void);
void main(){
int x1=10,y1=9,x2=70,y2=19,x,y,mark=0;
char symbol,c,attrib,h=259,refresh;
struct w *head=NULL,*tail, *p, *q,*r; time_t t1,t2;
time(&t1);
cursor_off();
srand(time(NULL));
textbackground(BLACK);
textcolor(LIGHTGRAY);
clrscr();
textcolor(GREEN);
gotoxy(20,1);cputs(" *** * * ** * * *****");
gotoxy(20,2);cputs("* * ** * * * * * * ");
gotoxy(20,3);cputs(" * * * * * * ** **** ");
gotoxy(20,4);cputs(" * * * * ***** * * * ");
gotoxy(20,5);cputs("* * * ** * * * * * ");
gotoxy(20,6);cputs(" *** * * * * * * *****");
textcolor(LIGHTGRAY);
gotoxy(20,21);cputs("Press arrows key for moving the snake.");
gotoxy(7,22);cputs("If the head gets on a symbol '+' the length of the snake is increased.");
gotoxy(7,23);cputs("If the head gets on a symbol '-' the length of the snake decreases.");
gotoxy(15,24); cputs("Try to construct the greatest length of the snake.");
textbackground(BLUE);
textcolor(WHITE);
x=x1-1; y=y1-1; gotoxy(x,y);putch(201);
y=y1-1;for(x=x1;x<=x2;x++){gotoxy(x,y);putch(205);
x=x2+1; y=y1-1; gotoxy(x,y);putch(187);
x=x2+1; for(y=y1;y<=y2;y++){gotoxy(x,y);putch(186);}
x=x2+1; y=y2+1; gotoxy(x,y);putch(188);
y=y2+1; for(x=x2;x>=x1;x--){gotoxy(x,y);putch(205);}
x=x1-1; y=y2+1; gotoxy(x,y);putch(200);
x=x1-1; for(y=y1;y<=y2;y++){gotoxy(x,y);putch(186);}
window(x1,y1,x2,y2);
clrscr();
for(x=1;x<=x2-x1+1;x++) for(y=1;y<=y2-y1+1;y++)
if(!(y==y2-y1+1&&x==x2-x1+1)) if((float)rand()/RAND_MAX>0.9) putch('+');
else if((float)rand()/RAND_MAX>0.9) putch('-');
else putch(' ');
textcolor(BLACK);
x=wherex();
y=wherey();
attrib=peekb(0xB800,(y1+y-2)*80*2+(x1+x-2)*2+1);
tail=(struct w*) malloc(sizeof(struct w));
tail->x=x;
tail->y=y;
tail->next=head;
head=tail;
pokeb(0xB800,(y1+head->y-2)*80*2+(x1+head->x-2)*2+1,0x30);
pokeb(0xB800,(y1+y-2)*80*2+(x1+x-2)*2, h);
do{
if(kbhit()){ c=getch();if(c==0)c=getch();refresh=1;}
switch(c){
case 72: y--;if(y<1) {y=1; refresh=0;} h=30; break;
case 80: y++;if(y>y2-y1+1) {y=y2-y1+1; refresh=0;} h=31; break;
case 75: x--;if(x<1) {x=1; refresh=0;} h=17; break;
case 77: x++;if(x>x2-x1+1) {x=x2-x1+1; refresh=0;} h=16; break;
default: refresh=0;}
pokeb(0xB800,(y1+head->y-2)*80*2+(x1+head->x-2)*2, h);
if(refresh==1){q=(struct w*) malloc(sizeof(struct w));
q->x=x;
q->y=y;
q->next=head;
q->before=NULL;
head->before=q;
head=q;
symbol=peekb(0xB800,(y1+y-2)*80*2+(x1+x-2)*2); if(symbol=='+')mark++;
pokeb(0xB800,(y1+head->y-2)*80*2+(x1+head->x-2)*2,h);
pokeb(0xB800,(y1+head->y-2)*80*2+(x1+head->x-2)*2+1,0x30);
if(head->next!=NULL) {pokeb(0xB800,(y1+head->next->y-2)*80*2+(x1+head->next->x-2)*2,' ');
pokeb(0xB800,(y1+head->next->y-2)*80*2+(x1+head->next->x-2)*2+1,0x30); }
if(symbol==' ') {r=tail; tail=tail->before; tail->next=NULL;
pokeb(0xB800,(y1+r->y-2)*80*2+(x1+r->x-2)*2+1, attrib); free(r); }
if(symbol=='-') {mark--; r=tail;
if(tail->before!=head) { tail=tail->before->before;
pokeb(0xB800,(y1+r->before->y-2)*80*2+(x1+ r->before->x-2)*2+1, attrib);
free(r->before); }
else if(tail!=head) tail=tail->before;
tail->next=NULL;
pokeb(0xB800,(y1+r->y-2)*80*2+(x1+r->x-2)*2+1,attrib);
free(r);}
gotoxy(x,y);
delay(Speed?abs(1000-Speed):10000); }
time(&t2); }while(c!=27&&(t2-t1<GameTime));
textbackground(BLUE);
textcolor(WHITE);
clrscr()
; gotoxy(25,5);cputs("GAME OVER");
gotoxy(16,6);cprintf("%s %d %s","Your prize makes",mark,"points"); getch();
cursor_on();}
void cursor_off(){_AH=0x1;_CH=0x20;geninterrupt(0x10);}
void cursor_on(){_AH=0x1;_CH=0x6;_CL=0x7;geninterrupt(0x10);}
Результат
На рис.3,4 ми бачимо вікно на якому зображена програма “Змійка”
Рис.3
Рис.4
Третій рівень
А. Наступна програма (файл preproc.c), використовуючи директиви препроцесора, записані на її початку, здійснює введення цілих чисел, обчислює та виводить квадрати їх значень. Вiдкомпiлювати, вiдлагодити та виконати програму.
#include <stdio.h>
#define n 5
#define begin {
#define end }
#define integer int
#define Program void
#define MyPrg main()
#define loop(n) for(i=1;i<=n;i++)
#define read(type,x) scanf(“%”#type,&x)
#define write(type,x) printf(“%”#type,x)
#define writeln(type,x) printf(#x”=%”#type”\n”,x)
#define SQR(x) ((x)*(x))
Program MyPrg
begin
integer i,x;
loop(n)
begin
write(s,”Input integer x of range 1..100->”);
read(d,x);
writeln(d,SQR(x));
end
end
Результат
На рис.5 ми бачимо результат виконня програми.
Рис.5
Б. Написати макрос, який повертає 1, якщо рiвняння 2 0 ax bx c (a<>0, b<>0, c<>0) має два рiзних дiйсних коренi, і 0 - в інших випадках.
#include "stdafx.h"
#include <stdio.h>
#include <iostream>
#include <conio.h>
using namespace std;
#define ABC(a, b, c, d) (d=(b*b)-(4*a*c))>0?1:0;
int main()
{
int a, b, c,d, res;
std::cin >> a>>b>>c;
res=ABC(a, b, c,d );
std::cout << res;
_getch();
return 0;
}
Результат
На рис.6,7 ми бачимо результат розвязування квадратних рівнянь.
Рис.6
Рис.7
Висновок:
Ми ознайомились із середовищем Borland C++ 3.1, вивчили способи запису програми на мові Сі, ознайомились з основними конструкціями мови Сі. Вивчили призначення, правила побудови та застосування засобiв препроцесорного опрацювання текстів програм на мовi Сі.
Ділись своїми роботами та отримуй миттєві бонуси!
0%
Оголошення від адміністратора