МОСКОВСКИЙ ИНСТИТУТ РАДИОТЕХНИКИ,
ЭЛЕКТРОНИКИ И АВТОМАТИКИ
(ТЕХНИЧЕСКИЙ УНИВЕРСИТЕТ)
Отчет по лабораторной работе №1
Программирование на языках В/У
Студент:
Группа:
Москва 2003
СОДЕРЖАНИЕ
1 ЗАДАНИЕ 3
2 БЛОК-СХЕМА ПРОГРАММЫ 3
3 ТЕКСТ ПРОГРАММЫ 4
4 ОПИСАНИЕ РАБОТЫ ПРОГРАММЫ 5
5 РУКОВОДСТВО ОПЕРАТОРА 7
1 ЗАДАНИЕ
Программа должна вставить новый элемент E после первого элемента непустого списка L.
2 БЛОК-СХЕМА ПРОГРАММЫ
да
нет
нет
да
нет
да
3 ТЕКСТ ПРОГРАММЫ
Program Project1;
{$APPTYPE CONSOLE}
Uses SysUtils;
type
spisok=^s;
s=record
i:integer;
p:spisok; end;
var
n,k:word;
E:integer;
L,FstL,LL:spisok;
BEGIN
Write('Kol. Elementov L:> ');ReadLn(k);
FOR n:=1 to k do BEGIN
New(L); Write('L',n,' :> '); ReadLn(L^.i);
L^.p:=nil;
IF n=1 THEN begin FstL:=L; LL:=L; end
ELSE begin LL^.p:=L;LL:=L; end;
END;
Write('Element E:> '); ReadLn(E);
New(L); L^.i:=E; L^.p:=FstL^.p; FstL^.p:=L; L:=FstL;
While L<>nil do begin Write(L^.i,' '); L:=L^.p; end;
ReadLn;
END.
... порядка е и истинного порядка Р. Поскольку мантисса результата формируется путем сдвига исходного числа влево, то регистры R2, R3 используем для размещения мантиссы результатов. Лабораторная работа №1а Преобразование целого числа в вещественное Преобразование целого числа в вещественное реализуется по формуле: . Структурная схема преобразования выглядит следующим образом: . ...
... скоростью вдоль линии индукции магнитного поля и по окружность в плоскости, перпендикулярной магнитному полю. Результирующим движением является движение по спирали с шагом h. Рис. 2 В настоящей работе для определения удельного заряда электрона e/m используется цилиндрический магнетрон. Магнетроном называется двухэлектродная электронная лампа (диод), в которой электроны, летящие от катода к ...
... ) Then BEGIN If (P^.a=Q^.a) and (P^.n=Q^.n) Then Begin P:=P^.p; Q:=Q^.p; End Else Begin Write('P <> Q'); b:=true; End; END; UNTIL b=true; ReadLn; END. 4 ОПИСАНИЕ РАБОТЫ ПРОГРАММЫ ТАБЛИЦА ТИПОВ, ИСПОЛЬЗУЕМЫХ ПРОГРАММОЙ Имя типа Тип Назначение spisok Динамическая переменная со структурой s s record Запись, содержащая ...
... на скорость реакции. Чем больше поверхность вещества, тем больше скорость протекания гетерогенной реакции. 2.4 Влияние концентрации реагирующих веществ на состояние равновесия. 2.4.1 Описание хода работы. В стакан налито 10 мл 2-х %-го раствора FeCl3 и добавлено 10 мл 1 %-го раствора KCNS. Полученный раствор разделен на 4 пробирки. В 1-ю добавляется 3-5 капель концентрированного раствора ...
0 комментариев