Полезное:
Как сделать разговор полезным и приятным
Как сделать объемную звезду своими руками
Как сделать то, что делать не хочется?
Как сделать погремушку
Как сделать так чтобы женщины сами знакомились с вами
Как сделать идею коммерческой
Как сделать хорошую растяжку ног?
Как сделать наш разум здоровым?
Как сделать, чтобы люди обманывали меньше
Вопрос 4. Как сделать так, чтобы вас уважали и ценили?
Как сделать лучше себе и другим людям
Как сделать свидание интересным?
Категории:
АрхитектураАстрономияБиологияГеографияГеологияИнформатикаИскусствоИсторияКулинарияКультураМаркетингМатематикаМедицинаМенеджментОхрана трудаПравоПроизводствоПсихологияРелигияСоциологияСпортТехникаФизикаФилософияХимияЭкологияЭкономикаЭлектроника
|
Программа. Declare SUB summa ‘ текст основной программы⇐ ПредыдущаяСтр 24 из 24 DECLARE SUB SUMMA ‘ текст основной программы DIM A(1 TO 10), Z(1 TO 10) DIM SHARED N, Y, E, Y,N, i DATA 0.1, 0.25, 0.3, 0.5, 1, 1.5, 2, 3.5, 4, 5 INPUT “E”; E CALL SUMMA (E, Y) FOR i = 1 TO 10 READ A(i) IF A(i) > 0.3 AND A(i) < = 2 THEN Z(i) = (A (i) + Y) ^ 5 ELSE Z(i) = ABS (2 * A (i) – Y) ^ (1 / 3) END IF PRINT “A(”; i; “)=”; A(i), “Z (”; i; “)=”; Z(i) NEXT i END SUB SUMMA(E, Y) ‘ текст подпрограммы пользователя SUMMA N = 1: Y = 0 DO YN = (N – 1.2) / (3 ^ N + N ^ 2) Y = Y + YN N = N + 1 LOOP WHILE ABS(YN) > E PRINT “Y=”; Y END SUB
Результат выполнения программы
E?_.00001 Y =.115105 A(1)=.1 Z (1)=.003107 A(2)=.25 Z (2)=.088053 A(3)=.3 Z (3)=.187003 A(4)=.5 Z (4)=.960058 A(5)= 1 Z (5)= 1.235271 A(6)= 1.5 Z (6)= 1.423563 A(7)= 2 Z (7)= 1.572026 A(8)= 3.5 Z (8)= 18235.03 A(9)= 4 Z (9)= 35194.17 A(10)= 5 Z (10)= 105889.3
Министерство образования и науки Украины Одесская государственная академия строительства и архитектуры Кафедра ПВМ и САПР Контрольная работа По информатике Семестр Выполнил(а) студент(ка) Группы (шифр группы) Фамилия, инициалы вариант № ___ Проверила Ковалёва И.Л. Одесса 2015 Министерство образования и науки Украины Одесская государственная академия строительства и архитектуры Кафедра ПВМ и САПР ЗАДАНИЕ № 1 Арифметические выражения и алгоритм линейной структуры Выполнил(а) студент(ка) Группы (шифр группы) Фамилия, инициалы вариант № ___ Проверила Ковалёва И.Л. Одесса 2015 Министерство образования и науки Украины Одесская государственная академия строительства и архитектуры Кафедра ПВМ и САПР ЗАДАНИЕ № 2 Алгоритм разветвляющейся структуры Выполнил(а) студент(ка) Группы (шифр группы) Фамилия, инициалы вариант № ___ Проверила Ковалёва И.Л.
Одесса 2015 Министерство образования и науки Украины Одесская государственная академия строительства и архитектуры Кафедра ПВМ и САПР
ЗАДАНИЕ № 3
Алгоритм циклической структуры
Выполнил(а) студент(ка) Группы (шифр группы) Фамилия, инициалы вариант № ___ Проверила Ковалёва И.Л.
Одесса 2015 Министерство образования и науки Украины Одесская государственная академия строительства и архитектуры Кафедра ПВМ и САПР ЗАДАНИЕ № 4 Алгоритм комбинированной структуры Выполнил(а) студент(ка) Группы (шифр группы)
|