Задачи по программированию

Автор: Пользователь скрыл имя, 02 Мая 2011 в 14:07, контрольная работа

Краткое описание

Решение 4 задач.

Файлы: 1 файл

Макаров1.doc

— 452.50 Кб (Скачать)

       Задание 1. Технические средства реализации информационных процессов.

       Начертите схему взаимодействия основных устройст вкомпьютера в процессе решения задач. Дать краткую характеристику узлов схемы, пояснить их назначение, привести примеры 

         

       Арифметическо-логическое устройство, которое выполняет арифметические и логические операции

       Устройство  управления, которое организует процесс  выполнения программ

       Запоминающее  утройство для хранения программ и данных

       Внешние устройства для ввода-вывода информации.

       Принципы функционирования ЭВМ, разработанные фон Нейманом, оказались настолько хороши, что они (с небольшими изменениями) до сих пор используются в современных компьютерах.

 

        Задание 2. Программирование линейных вычислительных процессов.

       Составить схему алгоритма и программу линейного вычислительного процесса.

Номер варианта Вариант Исходные  данные
А В С D
0
10 3,2 12,*102 5,2
 

       Алгоритм 

         

 
 

 
 

 
 

 

                              X, G 

 
 
 
 
 
 

 

Программа 

program z2;

uses crt;

var

a,b,c,x,d,g:real;

begin

writeln('vvod a,b,c,d ');

readln (a,b,c,d);

x:=a-sqrt(b+abs(cos(3*c)));

g:=exp(a)+2*exp(1.5*ln(d))+x;

writeln('x=',x,' g=',g);

readkey

end. 
 

Пример  работы программы

 
 
 
 
 
 

 

        Задание 3. Программирование ветвящихся вычислительных процессов

       Составить схему алгоритма и программу  ветвящегося вычислительного процесса.

Номер варианта Вариант
0
 

       Алгоритм 

         
 
 
 
 
 
 
 

 

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

                             y

 

Программа 

program z3;

uses crt;

var

x,y:real;

begin

writeln('vvod x= ');

readln (x);

if (x>=-pi/2) and (x<=pi/2) then y:=2*sqr(cos(x))-sin(x);

if (x>-pi/2) and (x<=(3*pi)/4) then y:=sqr(cos(x))/ln(1-cos(x));

if (x<-pi/2) or (x>(3*pi)/4) then y:=1/(sqr(sin(x))-cos(x));

writeln('y=',y);

readkey

end. 
 

Пример  работы программы 

 
 
 
 
 
 

 

Задание 4. Организация циклов

       Составить схему алгоритма и программу  циклического вычислительного процесса.

       Индексацию  элементов заданого массива начать с 0. Для перебора элементов массива  использовать оператор For.

Номер варианта Вариант
0 Дан массив В, содержащий 12 элементов целого типа, образуют ли 8 послдених элеиентов этого массива  возрастающую последовательность?
 

       Алгоритм

 
 
 

 

 
 

 
 

          последние 8                                         не возрастают, индекс

            елементов                                           елемента, на котором

           возрастают                                        заканчивается возрастание   

                                                                           равен k

 

 

 
 

 

Программа 

program z4;

uses crt;

label a1;

var

a:array [0..12] of integer;

i,k,d:integer;

begin

clrscr;

for i:=0 to 11 do

  begin

  write('a[',i,']=');

  readln(a[i]);

  if i>4 then

   if (a[i]<a[i-1])  and (d=0)  then

     begin

     d:=d+1;

     k:=i;

     end;

     end;

if k=0 then write('poslednue 8 elementov vozrastayt')

else

writeln('ne vozrastaet, undeks elementa ',k);

 readkey

End. 

Примеры работы программы

 
 
 

 

Задание 5. Организация сложных циклов

       Составить схему алгоритма и программу  циклического вычислительного процесса. Ввод данных выполнить с помощью оператора For. Программу снабдить комментариями.

       Перебор элементов исходной матрицы вести  по столбцам. Использовать два оператора repeat.

Номер варианта Вариант
0 Дана целочисленная  матрица D(4x5). Найти наибольший по модулю элемент матрицы и его местоположение в ней (номер строки и столбца на пересечении которых он расположен).

       Алгоритм

   

   

     

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

                                                                 max 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

 

Программа 

program z5;

uses crt;

var

d:array [1..4,1..5] of integer;

i,j,imax,jmax,max:integer; 

begin

  writeln('vvedute matricy');

   for i:=1 to 4 do

    for j:=1 to 5 do

     readln(d[i,j]); 

     max:=abs(d[1,1]); 

     i:=1; 

     repeat

     j:=1;

     repeat

      if abs(d[i,j])>max  then

      begin

      imax:=i;

      jmax:=j;

      max:=d[i,j];

      end;

     j:=j+1;

     until j=5;

     i:=i+1;

     until i=4; 

    writeln('max=b[',i,j,']=',max);

    readkey

    end. 
Задание 6. Программирование с использованием подпрограмм.

       Составить схему алгоритма главной программмы и подпрограммы, главную программу и подпрограммму

       При решениии задачи использовать подпрограмму-функцию. Обмен данными между главной  программой и подпрограммой – через списки формальных и фактических параметров

Номер варианта Вариант
0 Вычислить число  сочетаний из m элементов по n, используя  формулу

       Алгоритм главной программы

 

                                         

          

                                        f 
 
 
 
 
 
 

Алгоритм подпрограммы

                     

 
Программа
 

program z6;

uses crt; 

function factor(x:integer):real;

var

  k,d,i:integer;

  begin

  d:=1;

  for i:=1 to x do

   d:=d*i;

  factor:=d;

  end; 

  var

  n,m,y:integer;

  f:real;

  begin

  write('vvedute n,m ');

  readln(n,m);

  y:=n-m;

  f:=factor(n)/(factor(m)*factor(y));

 writeln('resultat=',f );

readkey

end. 
Задание 7. Изучение приемов работы с современными пакетами прикладных программ для офисов.

Номер варианта Вариант
0 Создание и  редактирование текстовых документов средствами текстового редактора Microsoft Word
 
 

       Текстовый редактор – это программа, которая  позволяет создать документ с  текстовыми данными.

       Текстовый процессор – это программа  для ввода, редактирования и обработки  текстовых документов с различной  информацией (например, с таблицами, графикой и т.д.).

Информация о работе Задачи по программированию