Презентация 9 -15 Ввод и вывод данных Реализация

Презентация 9 -15 Ввод и вывод данных Реализация линейного алгоритма

Оператор присваивания Задание 1 В про грам ме «: =» обо зна ча ет опе ра тор при сва и ва знаки «+» , «*» и «/» — со от вет ствен но опе ра ции сло же ния, вы чи та ния, умно же ния и де ле ния. Пра в вы пол не ния опе ра ций и по ря док дей ствий со от вет ству ют пра ви лам ариф ме ти ки. Опре де ли т зна че ние пе ре мен ной b после вы пол не ния ал го рит ма а : = 2 b : = 4 а : = 2*а + 3*b b : = a/2*b В от ве те ука жи те одно целое число — зна че ние пе ре мен ной b.

Оператор присваивания Задание 2 В про грам ме «: =» обо зна ча ет опе ра тор при сва и ва знаки «+» , «*» и «/» — со от вет ствен но опе ра ции сло же ния, вы чи та ния, умно же ния и де ле ния. Пра в вы пол не ния опе ра ций и по ря док дей ствий со от вет ству ют пра ви лам ариф ме ти ки. Опре де ли т зна че ние пе ре мен ной b после вы пол не ния ал го рит ма а : = 4 b : = 10 а : = b - a*2 b : = 24/a*4 В от ве те ука жи те одно целое число — зна че ние пе ре мен ной b.

Ввод данных Ввод информации с клавиатуры осуществляется с помощью оператора Read. Когда в программе встречается оператор Read или Read. Ln, то её действие приостанавливается до тех пор, пока не будут введены исходные данные. Оператор ввода имеет вид: Read(<список ввода>) Read. Ln(<список ввода>) Пример Read(a, b, c); Read. Ln(a); READLN(b);

Вывод данных Для вывода информации на экран используется оператор Write. Оператор вывода имеет вид: Write(<список вывода>) Write. Ln(<список вывода>) Пример Write(a); Write. Ln('Сумма ', a+b);

Шаблон программы: Program имя; Const; Var; Begin оператор 1; оператор 2; …. . оператор n 1; оператор n; End. { Заголовок программы } { Раздел описаний } { раздел констант; } { раздел переменных; } { Числа в языке Pascal различаются как целые integer и вещественные real} { Тело программы }

Линейная программа Program p 1; Var a, b, c: integer; Begin Write('Введите два целых числа через пробел: '); Read. Ln(a, b); c: =a*b; Write. Ln('Их произведение равно: ', c); End.

Очистка экрана Для подключения модуля необходимо в начале программы (после заголовка) написать строку: uses CRT В теле программы (после Begin) используется оператор Clr. Scr.

Задание 3 Составьте программу вычисления значений функции у по формуле у = , для которой значение х введите с клавиатуры.

Задание 3 program zadanie_1; uses crt; var x, y: real; begin Clr. Scr; write('x='); readln(x); y: =sqrt((2*x+abs(3*x))/3. 56); write('y=', y); end.

Задание 4 Напишите программу нахождения длин медиан m 1, m 2 и m 3 треугольника по указанным формулам. Длины сторон a, b и с задаются с клавиатуры. m 1 = , m 2 = , m 3 = .

Задание 5 Определите значение целочисленных переменных a и b после выполнения фрагмента программы: а : =1686; b : =(a div 10) mod 5; а : = а - 200*b;

Задание 6 Определите значение целочисленных переменных x и y после выполнения фрагмента программы: х : = 11; у : = 5; t : = y; у : = х mod у; x : = t; у : = у + 2*t;

Задание 7 Напишите программу вычисления длин сторон треугольника a, b и с по указанным формулам. Треугольник задан координатами своих вершин (х1, у1), (х2, у2) и (х3, у3). а= , b= , c= .