?>
Основними алгоритмічними структурами є: * слідування цикл розгалуження функції оператори Яка алгоритмічна структура описана «команди виконуються послідовно одна за іншою»? * слідування розгалуженняцикл цикл повторення Яка алгоритмічна структура описана «інструкції що виконують одну і ту ж послідовність дій поки діє задана умова»? * цикл розгалуження слідування лінійна Яка алгоритмічна структура описана «алгоритм, що містить хоча б одну умову в результаті перевірки якої може виконуватись розділення на декілька паралельних гілок»? * розгалуження слідування цикл повторення Яке призначення Функції pi модуля math? * повертає sqrt (x ** 2 + y ** 2 Зручно для обчислення гіпотенузи і довжини вектора повертає арккосинус x, в радіанах константа π = 3.1415 ... повертає косинус x, в радіанах Який оператор описаний «Такий складений логічний вираз буде набувати значення true тільки у тому випадку, якщо всі змінні або логічні вирази будуть мати значення true. Якщо хоча б один із них буде мати значення false то і весь вираз буде набувати цього значення»? * And Not Or Для чого використовується help ()? * означає перехід на новий рядок для вирівнювання тексту, завдяки відступам щоб помістити в рядок апостроф (одинарні лапки) або подвійні лапки, які оточені таким ж лапками вертикальна табуляція ознайомлення з описом модуля і функцій, які входять до нього Яке призначення Функції sqrt(x) модуля math? * повертає факторіал цілого числа x, якщо x не ціле виникає виключення ValueError квадратний корінь з x повертає дробову і цілу частину float числа. Обидва результати зберігають знак вихідного числа x і представлені типом float повертає x в ступені y. На відміну від операції ** перетворює обидва аргументи в тип float Який оператор описаний «Застосовується трішки по іншому: він ставиться на початку, тобто перед логічним виразом, надаючи йому при цьому протилежного значення»? * Not Or And End Який оператор описаний «Результатом виразу буде true в тому випадку, якщо хоча б один із складових цього виразу буде мати значення true»? * Or Not And End Яке призначення функції atan(x)? * Повертає арккосинус x, в радіанах Повертає арксинус x, в радіанах. Повертає арктангенс x, в радіанах. Повертає косинус x, де x виражений в радіанах. Повертає тангенс x, де x виражений в радіанах. Яке призначення Функції len() * підраховує символи в рядку переведення числа у двійкову систему числення пошук максимуму з 2 чисел, може приймати будь-яку кількість аргументів пошук мінімуму з 2 чисел, також може приймати будь-яку кількість аргументів переведення числа у вісміркову систему числення пройдите тест
Ответы
Предполагается, что вводимые числа - целые.
1) С цикла Repeat Until
Program n1;
Uses CRT;
Var s,k,i: integer;
sr: real;
begin
Writeln('Vvodite chisla. Vvedite 0 dlya okoncania vvoda');
Repeat
Readln(i);
s:=s+i;
inc(k);
Until i=0;
sr:=s/(k-1);
Writeln('Srednee arifmeticheskoe = ',sr:4:4);
readln
end.
2) С цикла While
Program n1;
Uses CRT;
Var s,k,i: integer;
sr: real;
begin
Writeln('Vvodite chisla. Vvedite 0 dlya okoncania vvoda');
i:=1;
While i<>0 do
begin
Readln(i);
s:=s+i;
inc(k);
end;
sr:=s/(k-1);
Writeln('Srednee arifmeticheskoe = ',sr:4:4);
readln
end.
3) С цикла For
Program n1;
Uses CRT;
Var s,j,k,i: integer;
sr: real;
begin
Writeln('Vvedite kolichestvo chisel');
Readln(k);
Writeln('Vvodite chisla');
For j:=1 to k do
begin
readln(i);
s:=s+i;
end;
sr:=s/k;
writeln('Srednee arifmeticheskoe = ',sr:4:4);
readln
end.