Лабораторная работа по "Основам алгоритмизации и программирования"
Автор: anastasiyaliapko • Февраль 24, 2020 • Лабораторная работа • 554 Слов (3 Страниц) • 444 Просмотры
Лабораторная работа № 1
по дисциплине «Основы алгоритмизации и программирования»
часть 1
Вариант № 24
Задача №1
1). Условие задачи.
Вычислить значение функции для и значения , изменяющегося от до с шагом . Результат вывести на печать в виде:[pic 1][pic 2][pic 3][pic 4][pic 5][pic 6]
Значение Значение Значение[pic 7][pic 8][pic 9]
Данная функция:
[pic 10]
2). Схема алгоритма
Схема алгоритма по ГОСТ 19. 701-90 представлена на рис. 1.
3). Текст программы.
Program Lab1;
Var
k: Integer;
x, s, f: Real;
Begin
x:=0.6;
While x<=1.1 do
Begin
s:=0
For k:=1 to 9 do
s:=s + Ln(Sqrt(Sqr(x)))/(2-1/k);
For k:=10 to 15 do
Begin
s:=s + Ln(Sqrt(Sqr(x)))/(2-1/k);
f:=Exp(Ln(x)*3)*(Sqrt(Sqr(x)))+Exp(Ln(n)*x)/5+s;
Writeln('N=',k:4,'X=',x:6:2,'F=',f:9:4);
End;
x:=x+0.25
End
End.
Результаты работы программы:
N=11 | X=1.10 | F=4.884 |
N=12 | X=1.10 | F=5.2190 |
N=13 | X=1.10 | F=5.5517 |
N=14 | X=1.10 | F=5.8866 |
N=15 | X=1.10 | F=6.2233 |
[pic 11]
[pic 12]
Рис. 1. Схема алгоритма по ГОСТ 19.701-90 (представление циклов с помощью символа «Граница цикла»; использование циклов с предусловием).
Задача №2
1). Условие задачи.
Пусть есть некоторое натуральное число. Найти сумму квадратов цифр этого числа, получив новое число, с этим новым числом проделать аналогичную процедуру. После конечного числа повторений этой процедуры получается либо число 1, либо число 4. На промежутке [1…N] найти числа и их количество, которые по завершении вышеописанной процедуры дают результат 1 (N<=30000).
...