Программа на АЯ y 1 x 2

Программа на АЯ y=(1 – x 2 + 5 x 4)2 алг пример цел X, Y нач ввод X X: =X*X Y: =1 – X X: =X*X X: =5*X Y: =Y+X Y: =Y*Y вывод Y кон Трассировка при x=2 команда X ввод X 2 X: =X*X Y 4 Y: =1 – X -3 X: =X*X 16 X: =5*X 80 Y: =Y+X 77 Y: =Y*Y 5929 вывод Y 5929

Паскаль – универсальный язык программирования 1971 г. Никлаус Вирт – швейцарский профессор Назван в честь Блеза Паскаля

АЯ алг деление дробей цел a, b, c, d, m, n нач ввод a, b, c, d m: =a*d n: =b*c вывод m, n кон Паскаль Program Division; Var a, b, c, d, m, n: integer; Begin readln (a, b, c, d); {ввод} m: =a*d; n: =b*c; write (m, n) {вывод} end.

Структура программы на Паскале Заголовок программы: Program имя программы; Раздел описания переменных: Var список пер. : тип; Раздел операторов: Begin операторы end.

Операторы • Ввода: read (список переменных) readln (список переменных) • Вывода: write (список вывода) writeln (список вывода) • Присваивания: имя переменной : = ариф. выражение

Какая задача решается по следующей программе? Program Test; Var A, B, C: integer; Begin readln (A, B); C: =(A+B)*(B-A); write (C) end. Каков результат, если в качестве исходных данных А и В ввести 7 и 8?

Задача № 7 стр. 337 (составить программу на Паскале) Program Zad; Var x, y: integer; Begin readln (x); X: =X*X; Y: =1 – X; X: =X*X; X: =5*X; Y: =Y+X; Y: =Y*Y; write (y) end.