Отчетная работа «РЕШЕНИЕ ЗАДАЧ ПО ПРОГРАММИРОВАНИЮ НА ЯЗЫКЕ PASCAL ABC»

ОТЧЕТНАЯ РАБОТА
«РЕШЕНИЕ ЗАДАЧ ПО ПРОГРАММИРОВАНИЮ
НА ЯЗЫКЕ PASCAL ABC»
ПМ.02 Разработка, внедрение и адаптация программного обеспечения отраслевой направленности
специальность 09.02.05 Прикладная информатика (по отраслям)
Автор работы:
ФИО студента,
№ группа
Руководитель:
ФИО преподавателя,
преподаватель


Ейск,
2016 год
Требования к составлению отчетной работы
Каждая задача ОБЯЗАТЕЛЬНО должна начинаться с нового листа.
Оформление задачи должно соответствовать примеру представленному ниже.
Блок-схему изобразить так, чтобы все объекты были сгруппированы и не прыгали при перемещении.
Формат бумаги А4 (297×210), расположенных вертикально.
На каждом листе оставляются поля: справа - 1 см, слева - 3 см, сверху и внизу -2 см,
Шрифт Times New Roman_кегль 14, полуторный межстрочный интервал, выравнивание по ширине, абзац при необходимости использовать отступ 1,25 см.
В таблице использовать шрифт Times New Roman_кегль 10-12, одинарный межстрочный интервал, выравнивание по левому краю, при необходимости использовать отступ 1 см.
Нумерация страниц на листах ставится внизу справа. На титульном листе нумерация не ставится.

Пример оформления
Задача 1. Текст задачи.
Решение:
Блок-схема Программа
Блок-схема
Для составления блок схемы можно использовать любую программу.
Текст программы
Можно скопировать текст с PASCAL ABC
или вставить скриншот
Контрольный пример.
Текст контрольного примера.

Например.
Задача 1. Составить алгоритм подсчета произведения двух переменных a, b, значение которых введены с клавиатуры.
Решение:
Блок-схема Программа
85554345283Начало
Начало

114681083820857307141341Ввод a, b
Ввод a, b

11468101790700
114681068135501146810327025085730785486р:= a*b
р:= a*b
857250714375Конец
Конец
857250438150Вывод рВывод р Program Zadacha1;
var a, b, p: integer;
begin
write ('Введите переменные a, b ');
read (a, b);
p:= a*b;
write ('Результат ', p);
end.
Контрольный пример.


Задачи
№1
Даны стороны прямоугольника a, b. Найти периметр P и площадь S.
№2
Даны длины двух катетов a, b прямоугольного треугольника. Найти периметр P.
№3
Даны величины a, b, c, d. Требуется переместить значения величин, если b = c, c = d, d =a, a = b.
№4
Даны переменные A, B, C, D. Требуется перенести значения величии A = C, B = D, C = A, D = B.
№5
A = D, D = A, B = C, C = B.
№6
Даны переменные A, B, C, D, E. A = E, B = C, C = D, D = B, E = A.
№7
y=x+5, x>0
y=x+50, x<0
x≠0
№8
y=x-10, x<0
y=x, x>0
x≠0
№9
c=a+b, a – четное
c=a*b, a – нечетное
№10
Вывести три числа в порядке, обратном вводу.
№11
Вывести квадрат введенного числа.
№12
Дано целое число. Если оно положительное, прибавить к нему 1. В противном случае – не изменить его. Вывести результат.
№13
Дано целое число. Если оно положительное, прибавить к нему 1, если отрицательное – вычесть 2, если равно 0 – заменить на 10. Вывести число.
№14
Даны два числа. Вывести первое число, если оно больше второго и оба числа, если это не так.
№15
Найти среднее арифметическое двух величин, если они положительные.
№16
Даны три числа. Возвести в квадрат те, которые неотрицательны, остальные приравнять к 0.
№17
Вывести наибольшее из двух чисел.
№18
Найти максимальное из трех чисел.
№19
Составить программу, проверяющую, принадлежит ли данное число интервалу (1, 5)
№20
Найти минимальное из двух чисел.
№21
Даны два числа. Подсчитать количество чисел, равных 0.
№22
Ввести два числа. Если их произведение отрицательно, умножить его на -2, в противном случае – умножить на 1,5.
№23
Ввести два числа. Вычесть из большего меньшее.
№24
Ввести на экран рост человека. Вывести на экран слово «высокий», если его рост превышает 180 см и «не очень высокий», если это не так.
№25
Даны три числа. Вывести максимальное и минимальное.
№26
Даны 10 чисел. Числа вводятся с клавиатуры. Возвести в квадрат сумму этих чисел.
№27
Найти сумму квадратов чисел от 2 до 6.
№28
Даны результаты спортсмена по 5 видам спорта. Найти общее количество баллов.
№29
Даны 10 чисел. Найти сумму положительных чисел.
№30
Даны 10 чисел. Найти:
а) сумму всех чисел, больших А;
б) количество всех четных чисел.
№31
Даны В1, В2,…, В9. Найти среднее арифметическое чисел и проверит, больше ли оно введенного С.
№32
Найти сумму последовательности чисел, которые больше введенного числа b.
№33
Найти сумму последовательности нечетных чисел, меньших 100.
№34
Найти сумму целых положительных чисел из промежутка от А до В, кратных 4.
№35
Найти сумму целых положительных чисел, больших 20, меньших 100, кратных 3 и заканчивающихся на 2, 4, 8.
№36
Проверить, принадлежит ли введенное число интервалу (1, 5).
№37
Вывести «температура высокая», если она больше 380С и «не очень высокая, если это не так.
№38
Найти количество трехзначных чисел, кратных 4 и больших введенного числа х.
№39
Найти произведение отрицательных четных чисел.
№40
Дана величина a, выражающая объем информации в Гб. Перевести данное значение в более мелкие единицы.
№41
Найти наименьший элемент последовательности.
№42
Найти максимальный элемент последовательности от 1 до 50.
№43
Найти количество квадратов всех положительных чисел последовательности.
№44
Написать блок-схему, проверяющую, является ли число:
а) четным;
б) кратным 6
№45
Составить программу для таблицы умножения на 9.
№46
Даны натуральные числа n, p. Подсчитать произведение целых членов последовательности a1,…an кратных р, количество положительных членов последовательности.
№47
Даны натуральное число n, действительные a1,…an. В последовательности a1,…an все отрицательные числа возвести в квадрат и подсчитать все числа последовательности, большие 3.
№48
Даны натуральные числа n, q1,…,qn. Найти числа qi последовательности q1,…,qn, которые являются удвоенными нечетными числами.
№49
Даны натуральное число n, целые числа a1,…an. Найти количество и сумму тех членов данной последовательности, которые делятся на 5 и не делятся на 7.
№50
Рассчитать значение Z для значения а
а = 2,3,…,17
Z = 3,5t2-7t+16
t=4a
№51
Проверить кратность 4 введенного числа.
№52
Умножить последнюю цифру числа на 5 и вывести результат.
№53
Найти сумму чисел двузначного числа.
№54
Найти сумму чисел трехзначного числа.
№55
Вывести число, если оно оканчивается на 5.
№56
Дано четырехзначное число. Определить:
1. Равна ли сумма первых двух цифр сумме двух его последних чисел;
2. Кратна ли 3 сумма его цифр;
3. Кратно ли 4 произведение его цифр;
4. Кратно ли произведение его цифр числу а?
№57
Дано трехзначное число. Выяснить, является ли оно палиндромом (перевертышем).
№58
Посчитать количество чисел, кратных 9, оканчивающихся на 5 в диапазоне от 1 до 500
№59
Если введенное число оканчивается на 5 и делитсся на 7, вывести Yes, иначе – No.
№60
Найти сумму чисел. Вычисление прекратить, когда сумма превысит число, введенное с клавиатуры.
№61
Вычислить сумму z=1, 2, … Вычисление прекратить, когда z превысит введенное число а.
№62
Вывести квадраты чисел, находящихся в диапазоне от 0 до 2 с шагом 0,2.
№63
Дано цело число N. Найти наименьшее целое положительное число K, квадрат которого превосходит N.