![]()
|
|||
Программа линейной структуры
Лабораторная работа №1 Программа линейной структуры Группа Птм 41 Чурбанов Сергей Вадимович Вариант 8 Задание 1. Составить программу для вычислиения арифметического выражения
Решение: Программа 1. 1 Av=((41+29/72)-((18+7/8)-(5+1/4))*((10+1/2)-(7+1/3)))/(22+7/8) print" Av="; Av end
Результаты расчета по Программе 1. 1 Av=-0. 7619915e-1
Задание 2. Составить программу для вычисления алгебраического выражения
Решение: Программа 1. 2
a=4. 3 z=a^8-9. 3*a^7+8. 7*a^6-12 print" a="; a, " z="; z end
Результаты расчета по Программе 1. 2 a=4. 3 z=-80925. 447
Задание 3. Составить программу для вычисление значение элементарной функции
Решение: Программа 1. 3
n=4. 3 y=(exp(2*n)-1)/(exp(-2*n)+1)*(sin(5*n)-cos(5*n)) print" n="; n, " y="; y end
Результаты расчета по Программе 1. 3 n=4. 3 y=7348. 66865
Задание 1А. Составить программу для вычисление объема цилиндра
Решение:
CLS Input" Введите высоте цилиндра: "; H Input" Введите радиос основания: ", R V=3. 14*R^2*H S=2*3. 14*R*H: Print Print" Объем цилиндра ="; V Print" Площадь боковой поверхности ="; S end
Введите высоту цилиндра: 5 Введите радиус основания: 3
Объем цилиндра=141. 3 Площадь боковой поверхности=94. 2
Задание 2А. Вычислить произведение всех цифр произвольного четырехзначного числа
Решение:
CLS Input": "; Number Print: Print: Number; ": "; Number=ABS(Number) i=int(Number/1000): Print i; j=int(Number/100)Mod 10: Print j; k=int(Number/10)Mod 10: Print k; l=Number Mod 10: Print 1 P=i*j*k*l*1 Print: Print; P End
|
|||
|