Сызықтық алгоритмдер – тармақталу мен қайталану әрекеттері жоқ, барлық әрекет тізбекпен, бірінен соң бірі табиғи реттілікпен бір реттен орындалатын алгоритмдік құрылым (1-сұлба).
Тармақталу алгоритмдер – бастапқы қойылған шарттың орындалуына қарай есептеулер жүргізудің бірінші немесе екінші жолымен жүруін көрсететін алгоритмдік құрылым (2-сұлба).
Циклдік алгоритм – бастапқы қойылған шарт орындалғанша қайталанатын командалар тізбегін көрсететін алгоритмдік құрылым. Цикл көмегімен программа құру программаны жазу процесін жеңілдетеді.
Спасибо
Ответ дал: Гость
var
x : array [1..15] of integer;
i : integer;
min : integer;
kol_nol : integer;
begin
kol_nol : = 0;
for i: =1 to 15 do
begin
write ("введите элемент массива: ");
readln(x[i]);
end;
min : = x[1];
for i : = 0 to 15 do
begin
if (x[i] > 0) then
begin
if (x[i] < min) then
begin
min : = x[i];
end;
end;
if (x[i] = 0) then
begin
inc(kol_nol);
end;
writeln(min);
writeln(kol_nol);
end;
Ответ дал: Гость
varn,i: integer; x0,y0,x1,y1,x2,y2,s: real; begin readln(n); s: =0; readln(x0,y0); x1: =x0; y1: =y0; for i: =2 to n do begin readln(x2,y2); s: =s+sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2)); x1: =x2; y1: =y2; end; x2: =x0; y2: =y0; s: =s+sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2)); writeln(s: 10: 2); end.
Популярные вопросы