Информатика. Гнедов ОО Программирование 1-4в. Отчет лабораторная работа 1 по дисциплине Программирование по учебнометодическому пособию Потаповой Е. А

• Название: Отчет лабораторная работа 1 по дисциплине Программирование по учебнометодическому пособию Потаповой Е. А
• Анкор: Информатика
• Дата: 12.02.2023
• Размер: 90.8 Kb.
• Имя файла: Гнедов ОО Программирование 1-4в.docx
• Тип: Отчет; #933659

Министерство образования и науки Российской Федерации

Федеральное государственное бюджетное образовательное учреждение высшего профессионального образования

ТОМСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ СИСТЕМ

УПРАВЛЕНИЯ И РАДИОЭЛЕКТРОНИКИ (ТУСУР)

Кафедра автоматизированных систем управления

(КАСУ)

ОТЧЕТ

Лабораторная работа № 1

по дисциплине

«Программирование»

по учебно-методическому пособию Потаповой Е. А.

Выполнил студент:

Гнедов Олег Олегович

2021 г.

СОДЕРЖАНИЕ

1. 
   Введение.
   
2. 
   Анализ задачи № 1.
   
3. 
   Решение задачи.
   
   1. 
      Описание используемых переменных, обоснование выбора типа данных
      
   2. 
      Описание алгоритма
      

3.3. Тестирование программы

4. 
   Анализ задачи № 2.
   
5. 
   Решение задачи.
   
   1. 
      Описание используемых переменных, обоснование выбора типа данных
      
   2. 
      Описание алгоритма
      
6. 
   Заключение.
   

Приложение 1. Листинг программы.

Приложение 2. Листинг программы.

1. 
   Введение.
   

Лабораторная работа № 1 посвящена созданию программ с использованием простых управляющих структур: условного оператора, цикла.

Решение первой задачи предусматривает использование простых типов данных

Решение второй задачи предусматривает использование строкового типа данных.

2. 
   Анализ задачи № 1.
   

В первой задаче нужно подсчитать количество вхождений в строку цифр.

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

• 
  Начало
  
• 
  Объявляем переменные
  
• 
  Задаем цикл
  
• 
  Вводим строку str
  
• 
  В результате получаем количество вхождений цифр в строку
  

4. 
   Анализ задачи № 2.
   

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

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

• 
  Начало
  
• 
  Объявляем переменные
  
• 
  Считываем целое число n
  
• 
  Проверяем его модуль
  
• 
  Считываем количество последних цифр m
  
• 
  Получаем сумму m
  

6. Заключение.

В результате выполнения лабораторной работы получены практические навыки составления программ на языке Паскаль.

Приложение 1

Задача 1

Для каждой цифры '0', '1', ... , '9' подсчитать количество

вхождений в данную строку S.

program z1;

var i, j, q : integer;

str : string;

c : char;

begin

readln(str);

for i := 0 to 9 do begin

c := chr(ord('0')+i);

q := 0;

for j := 1 to length(str) do

if(str[j] = c) then inc(q);

writeln('Цифра ', c, ' встречается в строке ', q, ' раз');

end;

end.

Приложение 2

Задача 2

Даны натуральные числа n, m. Получить сумму m последних цифр числа n. Число n вводить как величину типа integer, и строки не использовать.

program z2;

var m,n,i,s:integer;

begin

write('Введите целое число n=');

readln(n);

n:=abs(n);//Проверка отрицательного числа

write('Введите количество последних цифр m=');

readln(m);

s:=0;

for i:=1 to m do

begin

s:=s+n mod 10;

n:=n div 10;

end;

write('Сумма ',m,' последних цифр=',s);

end.