Var
y0, yk, yk1, eps, d: double;
i: integer;
begin
y0 := 0; yk1 := y0;
Write('Введите величину погрешности: ');
Readln(eps);
repeat
yk := (yk1 + 1) / (yk1 + 2);
d := yk - yk1;
if d >= eps then yk1 := yk
until d < eps;
Writeln('yn=', yk)
end.
Тестовое решение:
Введите величину погрешности: 1e-8
yn=0.618033988205325
Var
x,y,z:array [1..10] of integer;
i,n:integer;
begin
writeln('введите n');
readln(n);
writeln('введите массив x');
for i:=1 to n do
readln(x[i]);
writeln('введите массив y');
for i:=1 to n do
readln(y[i]);
for i:=1 to n do
z[i]:=x[i]*y[i];
writeln('Массив x: ');
for i:=1 to n do
write(x[i],' ');
writeln;
writeln('Массив y: ');
for i:=1 to n do
write(y[i],' ');
writeln;
writeln('Массив z: ');
for i:=1 to n do
write(z[i],' ');
writeln;
end.
1) Берет билет
Проверяет билет
Сообщает информацию пассажиру (в зависимости от ситуации, например, если билет фальшивый)
Отдает билет
2) Написание сообщения
Отправка сообщения
Дальнейшая передача сообщение по сети
Прием сообщения
3) Написать телеграмму
Отправить телеграмму
Получить телеграмму
Прочитать телеграмму
Вроде так)
Экспоненциальная форма числа используется для записи очень больших или очень маленьких чисел.
#include <iostream>
using namespace std;
int main() {
int n;
cin >> n;
if (n \% 2) cout << "Ошибка ввода";
else for (int k = 0; k <= n/4; k++) {
cout << "Кроликов: " << k << ", гусей: " << (n-k*4)/2 << "\n";
}
return 0;
}
Пример:
14
<span>Кроликов: 0, гусей: 7
Кроликов: 1, гусей: 5
Кроликов: 2, гусей: 3
Кроликов: 3, гусей: 1</span>