1 Программирование алгоритмов линейной структуры

Цель работы: Ознакомление с правилами построения алгоритмов, структурой программы на языке Паскаль, правилами записи арифметических выражений, особенностями программирования алгоритмов линейной структуры, а также использования оператора присваивания, процедур ввода и вывода данных.

1.1 Практическое задание №1

Составить блок-схему и программу вычисления значений функции при заданных значениях аргумента.

Условие:

Словесный алгоритм:

1. Ввести переменные x и y;

3. В

   1

   ывести Z;

4. Конец алгоритма.

Блок-схема:

2

3

4

5

Программная запись:

Pascal:

Program Zadanie1;

Uses crt;

Var x,y:integer; Z:real;

Begin

Clrscr;

Writeln('Vvedite x i y');

Readln(x,y);

Z:=(sqr(sin(x+y))/sqr(x+y))-(sqrt(abs(3*x-4*y))/(cos(x)+exp(5*x)));

Writeln('Z=', Z:5:3);

Readln;

End.

C++:

#include<stdio.h>

#include<math.h>

#include<conio.h>

main()

{

clrscr();

int x,y; float Z;

printf("Vvedite x i y\n");

scanf("%d %d", &x, &y);

Z=(pow(sin(x+y),2)/pow(x+y,2))-(sqrt(abs(3*x-4*y))/(cos(x)+exp(5*x)));

printf("\nZ= %f", Z);

getch();

}

2 Программирование алгоритмов разветвленной структуры

Цель работы: Ознакомление с особенностями программирования алгоритмов разветвленной структуры, а также использования различных операторов перехода.

2.1 Практическое задание №2

Составить блок-схему и программу разветвляющейся структуры для вычисления заданной функции.

Условие:

Словесная запись:

1. Ввести переменную x;

2. Проверить: если x>=0, то y=ln(4*sqr(x)+5)/ln(10), иначе y=sqrt(4*sqr(x)+5);

3. Вывести y;

4. Конец алгоритма.

Б

1

лок-схема:

2

3

+

-

4

5

6

7

Программная запись:

Pascal:

Program Zadanie2A;

Uses crt;

Var x:integer; y:real;

Begin

Clrscr;

Writeln('Vvedite x');

Readln(x);

if x>=0 then y:=ln(4*sqr(x)+5)/ln(10)

else y:=sqrt(4*sqr(x)+5);

Writeln('y=',y:5:3);

Readln;

End.

C++:

#include<stdio.h>

#include<math.h>

#include<conio.h>

main()

{

clrscr();

int x; float y;

printf("Vvedite x\n");

scanf("%d", &x);

if (x>=0) y=log(4*pow(x,2)+5)/log(10);

else y=sqrt(4*pow(x,2)+5);

printf("\ny= %f", y);

getch();

}

2.2 Практическое задание №3

Составить программу решения задачи, используя оператор выбора

Условие: Вводится целое число. Если введено "1", то вывести "понедельник". Если введено "2", то вывести "вторник" и т.д. В остальных случаях - "Повторите попытку ввода".

Б

1

лок-схема:

2

3

4

+

5

6

+

-

-

7

8

+

10

+

-

9

11

12

-

14

13

+

16

+

-

15

-

17

18

19

+

-

Программная запись:

Pascal:

Program Zadanie2B;

Uses crt;

Label m1;

Var i:integer;

Begin

Clrscr;

m1: Writeln('Vvedite chislo');

Readln(i);

Case i of

1: Writeln('Monday');

2: Writeln('Tuesday');

3: Writeln('Wednesday');

4: Writeln('Thursday');

5: Writeln('Friday');

6: Writeln('Saturday');

7: Writeln('Sunday');

else Writeln('Povtorite vvod');

end;

if i>7 then goto m1;

Readln;

End.

C++:

#include<stdio.h>

#include<conio.h>

main()

{ clrscr();

int i;

m1: printf("\nVvedite chislo \n");

scanf("%d", &i);

switch(i)

{case 1: printf("\nMonday"); break;

case 2: printf("\nTuesday");break;

case 3: printf("\nWednesday");break;

case 4: printf("\nThursday");break;

case 5: printf("\nFriday"); break;

case 6: printf("\nSaturday"); break;

case 7: printf("\nSunday");break;

default:printf("\nPovtorite vvod");break;}

if (i>7) goto m1;

getch(); }