Студопедия Главная Случайная страница Обратная связь

Разделы: Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

Паскаль Алгоритмический язык






алг деление дробей цел a,b,c,d,m,n нач ввод a,b,c,d m:=axd n:=bxc вывод 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 (программа), за которым следует произвольное имя, придуманное программистом.

Program <имя программы>;

Раздел описания переменных начинается со слова Var (variables - переменные), за которым идет список имен переменных через запятую. Тип указывается после двоеточия. В стандарте языка Паскаль существует два числовых типы данных: вещественный и целый. Слово integerобозначает целый тип (является идентификатором целого типа). Вещественный тип обозначается словом real. Например, раздел описания переменных может быть таким:

Var a, b: integer; c,d:real;

Идентификаторы переменных составляются из латинских букв и цифр; первым символом обязательно должна быть буква.

Раздел операторов (оператор - команда алгоритма, записанная на языке программирования) - основная часть программы. Начало и конец раздела операторов программы отмечается служебными словами begin (начало) и end (конец). В самом конце программы ставится точка.

begin
<операторы>
end.

Вывод результатов происходит по оператору write (write - писать) или writeln (writeln - писать в строку.

Арифметический оператор присваивания на Паскале имеет следующий формат:

<числовая переменная>:=
<арифметическое выражение>

Арифметическое выражение может содержать числовые константы и переменные, знаки арифметических операций, круглые скобки. Кроме того, в арифметических выражениях могут присутствовать функции.

Знаки основных арифметических операций записываются так:

+ сложение

- вычитание

* умножение

/ деление

Примеры программ на языке программирования Pascal

Линейная стуктура

Задача. Заданы длины двух катетов прямоугольного треугольника a, b. Вычислить длину гипотенузы с.

Program treug;
var a, b ,c: real;
begin
write ('a='); read (a);
write ('b='); read (b);
c:=sqrt (a*a+b*b);
writeln ('c=', c:6:2);
end.

Ветвление

Задача. Сравнить значения двух переменных X и Y.

Program Sorting;
var x, y, c: real;
begin
readln (x,y);
if x>y then writeln (‘x>y’) else writeln (‘x<y’);
end.

Цикл

Задача. Составить программу, которая вычисляет и печатает площади 20 квадратов со сторонами от 1 до 20.

Program two;

Var

x,s: real;

Begin

x:=1;

writeln (‘сторона площадь’); {печать шапки таблицы}

whilex<=20 do {пока выполняется условие выполняй}

Begin

s:=x*x; {тело цикла}

writeln (x, ‘ ‘, s);

x:=x+1; {изменение параметра цикла с шагом 1}

end;

End.

 

 

2. Практическое задание Работа с архиваторами winrar, zip. Создание архива папки, разархивирование. Антивирусные программы. Использование и настройка антивирусных программ.

Теория: В недалеком прошлом размер жесткого диска (винчестера) исчислялся несколькими десятками мегабайт, да-да именно мегабайт, а не несколькими сотнями гигабайт, как сейчас.

C ростом объемов винчестеров растут и размеры создаваемых программ. На современных винчестерах мы можем хранить большой объем информации: несколько часов прослушивания музыкальных произведений, несколько десятков фильмов, всевозможных игр, программ и так далее.

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

Что же такое архивация и сжатие файлов?







Дата добавления: 2015-06-15; просмотров: 475. Нарушение авторских прав; Мы поможем в написании вашей работы!



Расчетные и графические задания Равновесный объем - это объем, определяемый равенством спроса и предложения...

Кардиналистский и ординалистский подходы Кардиналистский (количественный подход) к анализу полезности основан на представлении о возможности измерения различных благ в условных единицах полезности...

Обзор компонентов Multisim Компоненты – это основа любой схемы, это все элементы, из которых она состоит. Multisim оперирует с двумя категориями...

Композиция из абстрактных геометрических фигур Данная композиция состоит из линий, штриховки, абстрактных геометрических форм...

Растягивание костей и хрящей. Данные способы применимы в случае закрытых зон роста. Врачи-хирурги выяснили...

ФАКТОРЫ, ВЛИЯЮЩИЕ НА ИЗНОС ДЕТАЛЕЙ, И МЕТОДЫ СНИЖЕНИИ СКОРОСТИ ИЗНАШИВАНИЯ Кроме названных причин разрушений и износов, знание которых можно использовать в системе технического обслуживания и ремонта машин для повышения их долговечности, немаловажное значение имеют знания о причинах разрушения деталей в результате старения...

Различие эмпиризма и рационализма Родоначальником эмпиризма стал английский философ Ф. Бэкон. Основной тезис эмпиризма гласит: в разуме нет ничего такого...

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

Вопрос 1. Коллективные средства защиты: вентиляция, освещение, защита от шума и вибрации Коллективные средства защиты: вентиляция, освещение, защита от шума и вибрации К коллективным средствам защиты относятся: вентиляция, отопление, освещение, защита от шума и вибрации...

Задержки и неисправности пистолета Макарова 1.Что может произойти при стрельбе из пистолета, если загрязнятся пазы на рамке...

Studopedia.info - Студопедия - 2014-2022 год . (0.016 сек.) русская версия | украинская версия