9) Перебирая значения индекса і от 1 до п, вычислим последовательно произведение элементов массива C (при условии что Р=1) по формуле: Oc[i]:=a[i]*p[i]-[i]; ОР:=a[i]*c[i]); OP:=P*C[i]; Oc[i]=P*C[i];
Набрать воды в 3 литровый кувшин. Вылить содержимое в 8 литровый кувшин набрать воды в 3 литровый кувшин. Вылить содержимое в 8 литровый кувшин набрать воды в 3 литровый кувшин Вылить содержимое в 8 литровый кувшин, оставив один литр в 3 литровом кувшине. Опустошить 8 литровый кувшин Вылить содержимое 3 литрового кувшина в 8 литровый Набрать воды в 3 литровый кувшин Вылить содержимое в 8 литровый кувшин Набрать воды в 3 литровый кувшин Вылить содержимое в 8 литровый кувшин Вот весь алгоритм. Поблагодари, если
// Напишите программу, которая в последовательности натуральных чисел определяет количество //чисел, кратных 3. Программа получает на вход количество чисел в //последовательности, а затем сами числа. В последовательности всегда имеется число, //кратное 3. Количество чисел не превышает 100. Введённые числа не превышают 300. //Программа должна вывести одно число - количество чисел, кратных 3.
Var i,j,x :word; n :integer; begin writeln('Введите количество цифр в последовательности'); Readln (j); if j>100 then //Проверка накличество чисел в последовательности begin writeln ('По условия задачи цифр не должно быть более 100'); writeln ('Введите количесво цифр еще раз'); readln (j); end; for i:=1 to j do begin Writeln ('Введите ',i,' число'); readln (n); if n>300 then //проверка максимального значения числа begin writeln ('Данное число не удовлетворяет условиям задачи (>300'); writeln ('Введите его еще раз'); readln (n); end; n:= n mod 3; if n=0 then x:=x+1; end; Writeln ('Количество чисел, кратных 3:'); Writeln (x); end.
Вылить содержимое в 8 литровый кувшин
набрать воды в 3 литровый кувшин.
Вылить содержимое в 8 литровый кувшин
набрать воды в 3 литровый кувшин
Вылить содержимое в 8 литровый кувшин, оставив один литр в 3 литровом кувшине.
Опустошить 8 литровый кувшин
Вылить содержимое 3 литрового кувшина в 8 литровый
Набрать воды в 3 литровый кувшин
Вылить содержимое в 8 литровый кувшин
Набрать воды в 3 литровый кувшин
Вылить содержимое в 8 литровый кувшин
Вот весь алгоритм.
Поблагодари, если