Рефераты | Рефераты по информатике, программированию | Ссылочные типы. Динамические переменные |
Ввод/вывод данных x+y |
|
|
12 |
Блок условия s2=’-‘ |
|
|
13 |
Ввод/вывод данных x-y |
|
|
14 |
Блок условия s2=’*’ |
|
|
15 |
Ввод/вывод данных x*y |
|
|
16 |
Блок условия s2=’/’ |
|
|
17 |
Ввод/вывод данных x/y |
|
|
18 |
Конец программы |
Протокол программы
BBeDi OPeRaciy
56*9
504,0
2-Задача2. Выполнить сортировку по латинскому алфавиту
Постановка задачи. Составить программу которая, сортирует буквы латинского алфавита по алфавиту.
Листинг программы
program Alfavit;
var
M:array[1..50] of string;
j,i,n:integer;
b:boolean;
s,tmp:string;
begin
writeln('BBeDu TekcT');
readln(s);
n:=length(s);
for i:=0 to n-1 do
begin
M[i]:=copy(s,i,1);
end;
b:=true;
while b do
begin
b:=false;
for i:=1 to n-1 do
begin
if m[i] > m[i+1] then
begin
tmp:= m[i];
m[i]:=m[i+1];
m[i+1]:=tmp;
b:=true;
end;
end;
