Вычисления в Паскаль
Перевод числа из десятичной системы счисления в двоичную. Результат выполнения в TURBO PASKAL заданных функций и операций. Программа вычисления значений функции на языке PASKAL, блок-схема. Вычисление суммы и произведения всех элементов массива.
Рубрика | Программирование, компьютеры и кибернетика |
Вид | контрольная работа |
Язык | русский |
Дата добавления | 15.02.2013 |
Размер файла | 66,6 K |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
Размещено на http://www.allbest.ru
Задание №1
а) перевести числа из десятичной системы счисления в двоичную;
35410 = 1011000102
354 : 2 = 177 (0)
177 : 2 = 88 (1)
88 : 2 = 44 (0)
44 : 2 = 22 (0)
22 : 2 = 11 (0)
11 : 2 = 5 (1)
5 : 2 = 2 (1)
2 : 2 = 1 (0)
1 : 2 = 0 (1)
0,71610 = 0,10110112
0,716 * 2 =1,432
0,432 * 2 = 0,864
0,854 * 2 = 1,728
0,728 * 2 = 1,456
0,456 * 2 = 0,912
0,912 * 2 = 1,824
0,824 * 2 = 1,628
б) определить результат выполнения в TURBO PASKAL следующих функций и операций
Int (17.95)
Int (функция) - возвращает целую часть параметра
10 Div 7
C Div B - деление целых чисел
в) записать на языке программирования PASKAL выражение
(X*SIN(Y+1)*SIN(Y+1)/(COS(Y+1)*COS(Y+1))+EXP(7*LN(LN(V)))-SQRT(SIN(X)))/(SQRT(2*B*Z+EXP(5*LN(Y)))+ABS(A-B-EXP(F)))
Задание №2
Составить на языке PASKAL программу вычисления значений функции:
F =
PROGRAM KR2;
USES PRINTER;
VAR F, X.Y, A.B, N: REAL;
BEGIN
WRITELN (`Введите значения Х,Y,A,B,N');
READLN (X,Y,A.B,N);
F: COS(EXP((A-B)*LN(X)))/(ABS(EXP (4*LN(Y)) - EXP(5*LN(B))) + 5.4) + SQR(N);
WRITELN( `X=', X:8:2, `Y =', Y:8:2, `A= `, A:8:2, `B=', B:8:2, `N=', N:8:2);
WRITELN (`F = `, F:8:2);
WRITELN (LST, ` X= `, X:8:2, `Y=', Y:8:2, `A=', A:8:2,
WRITELN (LST,'F=', F:8:2)
END.
Задание № 3
Составить программу вычисления функции на языке PASKA
PROGRAM KR3;
USES PRINTER;
VAR X,Y: REAL;
BEGIN
WRITELN (`ВВОД X');
READLN (X);
IF X? = 0 THEN Y: = EXP (3 * LN(X)) + 7 ELSE
IF X ? 2 THEN Y: = EXP (5 * LN(X)) ELSE Y: = 1 - EXP(4 * LN(X));
WRITELN (`X = `, X:9:3, `Y = `, Y:9:3);
WRITELN (LST, `X = `, X:9:3, `Y = `, Y:9:3)
END.
БЛОК СХЕМА
Задание № 4
Составить на алгоритмическом языке PASKAL программу вычисления значений функций Z = при этом x с шагом 0,125 используя, оператор FOR.
PROGRAM KR4;
USES PRINTER;
VAR X,Y,Z: REAL; I: INTEGER;
BEGIN
WRITELN (`ВВЕДИТЕ ЗНАЧЕНИЯ Y');
READLN (Y);
X: = 1;
FOR I : = 1 TO 17 DO BEGIN
Z: = SQR (Y) * LN (X) + 1;
WRITELN (`X = `, X:8:1, `Y = `, Y:8:1, `Z = `, Z:8:1);
WRITELN (LST,'X = `, X:8:1, `Y = ` Y:8:1, `Z = `, Z:8:1);
X: = X + 0.125
END;
END.
БЛОК СХЕМА “FOR”
Задание №5
Написать программу на алгоритмическом языке PASKAL с использованием любого оператора цикла
PROGRAM KR5;
USES PRINTER;
VAR X;H;Y: REAL;
BEGIN
WRITE (` ВВЕДИТЕ ЗНАЧЕНИЕ H');
READ (H);
WRITELN (`H = `, H:8:2);
WRITELN (LST, `H = `, H:8:2);
X: = -1.3;
WHILE X ? = 1.8 DO BEGIN
IF X ? = 0 THEN Y: = H + X ELSE
IF X ? 1 THEN Y: = LN (X) ELSE Y: = 4 * SIN (X + 1);
WRITELN (`X = `, X:8:2, `Z = `, Z:8:2, `Y = `, Y:8:2);
WRITELN (LST, `X = `, X:8:2, `Z = `, Z:8:2, `Y = `, Y:8:2);
X: = X+0.2
END;
END.
БЛОК СХЕМА “WHILE”
Задание №6
счисление паскаль функция массив
Вычислить сумму и произведение всех элементов массива T(10) (= T(10))
PROGRAM KR6;
USES PRINTER;
LABEI M;
VAR I: = 1 TO 10 DO READLN (T[I]);
WRITELN (`ИСХОДНЫЙ МАССИВ А');
WRITELN (LST, И ИСХОДНЫЙ МАССИВ А');
S: = 0;
P: = 1;
FOR I: = 1 TO 10 DO S: = S + T[I] AND P: = P * T[I];
WRITELN (`S = `, S);
WRITELN (`P = ` P);
END.
Размещено на www.allbest.
Подобные документы
Разработка различных программ для вычисления X и Y по формуле, для вычисления интеграла, для вычисления таблицы значений функции и для вычисления элементов вектора. Составление блок-схемы программы. Ввод значений, описание переменных и условия расчета.
контрольная работа [148,1 K], добавлен 08.11.2013Исходный текст программы и ее экранная форма. Программа вычисления и выдачи на печать суммы/произведения элементов бесконечного числового ряда, вычисления числового ряда для известного числа членов ряда. Значение максимального элемента в матрице.
контрольная работа [29,0 K], добавлен 07.12.2010Примеры правила перевода чисел с одной системы в другую, правила и особенности выполнения арифметических операций в двоичной системе счисления. Перевод числа с десятичной системы в двоичную систему счисления. Умножение целых чисел в двоичной системе.
контрольная работа [37,3 K], добавлен 13.02.2009Элементы и переменные, используемые для составления записи в Паскале. Основные числовые типы языка Turbo Pascal. Составление блок-схемы приложения, программирование по ней программы для вычисления функции. Последовательность выполнения алгоритма.
лабораторная работа [256,9 K], добавлен 10.11.2015Принцип работы основных операторов языка программирования Turbo-Paskal: оператор присваивания, выбора Case, безусловного перехода, цикла, уловный, составной. Формальное описание и вызов функции и процедуры. Требования к списку фактических параметров.
реферат [261,8 K], добавлен 09.02.2011Решение задач с помощью языка программирования Delphi: вычисление значения функции Y от X; систем двух уравнений; прогрессий; последовательностей; вычисление числа с определенной точностью; перевод числа из десятичной в восьмеричную систему счисления.
отчет по практике [83,8 K], добавлен 08.06.2010Решение задачи вычисления и вывода значений функций. Разветвляющиеся и циклические вычислительные процессы. Задача табулирования. Блок схема и код программы. Вычисления по рекуррентным формулам. Программирование вложенных циклов. Сумма элементов матрицы.
контрольная работа [1,1 M], добавлен 10.12.2013Особенности работы в режиме командной строки в системе Matlab. Переменные и присваивание им значений. Комплексные числа и вычисления в системе Matlab. Вычисления с использованием функции sqrt. Неправильное использование функций с комплексными аргументами.
дипломная работа [1,9 M], добавлен 30.07.2015Работа в Pascal, теория рядов. Главные признаки сходимости знакоположительных рядов. Общее понятие о ряде Тейлора. Вычисление конечной суммы факториального ряда для заданного массива значений. Исходный текст программы. Результаты выполнения программы.
контрольная работа [1,6 M], добавлен 06.08.2013Общее представление о системах счисления. Перевод чисел в двоичную, восьмеричную и шестнадцатеричную системы счисления. Разбивка чисел на тройки и четверки цифр. Разряды символов числа. Перевод из шестнадцатеричной системы счисления в десятичную.
практическая работа [15,5 K], добавлен 19.04.2011