Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
pril1.doc
Скачиваний:
26
Добавлен:
31.05.2015
Размер:
604.67 Кб
Скачать

Операторы ввода и вывода

1. Оператор ввода

  1. Read (список переменных) – этим оператором вводятся последовательно значения переменных из списка;

Пример: READ (X,Y);

  1. Readln (список переменных) – тоже что и read, но с переводом курсора на новую строку после ввода последней переменной;

Пример: READLN (X,Y);

  1. READLN– ввод пустой строки.

Пример: READLN;

2. Оператор вывода

  1. WRITE(список переменных) – выводятся последовательно переменные из списка;

Пример: write(x, y);

write (x : 7 : 2, y : 7 : 2); где

7 – количество позиций под все число, а 2 – количество позиций после запятой

  1. WRITELN(список переменных) – тоже что иwrite, но с переводом курсора на новую строку после вывода последней переменной;

  1. WRITELN– вывод пустой строки;

Вопросы для закрепления:

Вычислить значение выражения:

  1. 2*3-13mod(19-3*4)

  2. 23+3*17div(9-18mod4)

  3. 2(x + 3) + ()2

  4. , прих=2.1 и х=0.3;

  1. x + + (x + )2 ,

  1. ln|2-| (x-) , приx=4 и х=0.74;

  2. cos|x2-| ,

  3. ln|x2 + | , приx=1.57 и х=-2.5;

Линейный алгоритм

Простейшей алгоритмической структурой является линейная последовательность операций, которые выполняются по очереди и именно в том порядке, в котором они записаны. Линейные алгоритмы и линейные программы обычно предназначены для решения относительно простых задач.

Например: Написать программу вычисления площади треугольника по трем сторонам, пользуясь формулой Герона.

Program tr;

var

a,b,c,p,s:real;

begin

writeln(’Введите длины сторон треугольника’);

readln(a,b,c);

p:= (a+b+c)/2;

s:=sqrt(p*(p - a)*(p - b)*(p - c));

writeln(’Площадь треугольника =’,s:5:2);

end.

Задача Дано целое трехзначное число А. Написать программу выделения количества сотен и количества единиц этого числа.

program p3_3;

var

a, a1, c : integer;

begin

writeln(’Введите число’);

readln(a);

a1 := a mod 10;

c := a div 100;

writeln(’Количество единиц =’,a1);

writeln(’Количество сотен =’, с);

end.

Задача Вычислить площадь кольца, ширина которого равна А, а отношение радиусов окружностей равно В.

program p3_5;

var

{s - площадь кольца

a - ширина кольца

b - отношение радиусов

r - расстояние от центра кольца до наружной стороны кольца}

s, a, b, r : real;

begin

write('Введите ширину кольца и отношение радиусов:');

readln(a,b);

r := (-a*b)/(1 - b);

{Поскольку площадь кольца = разности площадей 2 кругов, радиусом

первого является r, а второго - r-a}

s := Pi*sqr(r) - Pi*sqr(r - a);

writeln(s);

readln

end.

Вопросы для закрепления

  1. Назовите основные этапы разработки программы.

  2. Какова структура Паскаль-программы?

  3. Что такое алгоритм? Каковы основные свойства алгоритма? Какими способами можно записать алгоритм?

  4. Запишите основные элементы блок-схем.

  5. В каком году и кем был создан язык Паскаль?

  6. Чем отличается алфавит языка Паскаль от естественных алфавитов?

  7. Что такое лексема?

  8. Какова структура Паскаль-программы?

  9. Что в списке можно рассматривать как идентификаторы:FIO, ФИО, 22222,X,Y, >=, &, $,Summa, _Result

  10. Укажите идентификаторы, которые проще воспринимаются при чтении, объясните причину:

klass; Klass_1; summadoxoda;SummaDoxoda;nomerdoma;Nomer_Doma.

  1. Сколько в следующем списке зарезервированных слов: X, Program, Y, Summa, MyMoney, Произведение, Vova, begin, end, if, repeat, Read?

  2. В каких случаях надо использовать переменные:

  • если в программе используется какое-то число?

  • если в вычислениях какой-то операнд постоянно меняет свое значение?

  • если операнд в выражении хотя бы один раз меняет значение?

  1. Какие заголовки программ правильны:programZarplata?programСумма?programSummaNalogov?программаTeach_Kurs?program12Kurs?programSumma_Elementov?

  2. Какая структура программы правильна:

    1. program MyProgram;

begin

Writeln(‘Привет’);

end.

2)Program MyFirst;

begin

X:=Y+100;

end.

  1. Какой из перечисленных разделов обязателен в программе:

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]