Вопросы
1. Представление о программировании: язык программирования (на примере одного из языков высокого уровня); примеры несложных программ с линейной, ветвящейся и циклической структурой.
2. Работа с архиваторами и антивирусными программами. Создание многотомного архива, использование антивирусных программ.
Ответ на вопрос № 1
1.1
Назначение программирования - разработка программ управления компьютером с целью решения различных информационных задач. Для составления программ существуют разнообразные языки программирования.
Язык программирования - это фиксированная система обозначений для описания алгоритмов и структур данных.
1.2
Существует много версий языка Паскаль. Различия между ними порой весьма велики.
Любая Паскаль-программа является текстовым файлом с собственным именем и с расширением .pas.
Заголовок программы начинается со слова Program , за которым следует произвольное имя, придуманное программистом: Program <имя программы>
Раздел описания переменных начинается со слова Var, за которым идет список имен переменных через запятую. Тип указывается после двоеточия. В стандарте языка Паскаль существует два числовых типы данных: вещественный - real, и целый - integer.: Var a, b: integer; c,d:real;
Идентификаторы переменных составляются из латинских букв и цифр; первым символом обязательно должна быть буква.
Раздел операторов (оператор - команда алгоритма, записанная на языке программирования) - основная часть программы. Начало и конец раздела операторов программы отмечается служебными словами begin и end. В самом конце программы ставится точка:
begin
<операторы>
end.
Вывод результатов происходит по оператору write или writeln. Ввод - read или readln.
Арифметический оператор присваивания на Паскале имеет следующий формат:<числовая переменная>:=
<арифметическое выражение>.
Арифметическое выражение может содержать числовые константы и переменные, знаки арифметических операций, круглые скобки. Кроме того, в арифметичесих выражениях могут присутствовать функции.
1.3
Линейная стуктура
Задача. Заданы длины двух катетов прямоугольного треугольника 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 begin
c:=x;
x:=y;
y:=c;
end;
write (x,y);
end.
Цикл
Задача. Дано N кубиков, на которых написаны разные буквы. Сколько различных N-буквенные слов можно составить из этих кубиков (слова необязательно должны иметь смысл)?
Program Words;
var f, n, r: integer;
begin
write ('введите число букв');
readln (n);
f:=1;
r:=1;
while r<=n do
begin
f:=f*r;
r:=r+1;
end;
write ('Из', n, 'букв можно составить ', f , 'слов');
end.
Сообщение [Страница 3 из 3]
Сайт сервера
Пн Фев 11, 2013 3:57 pm автор 
