Садовник вырастил 10 роз, расположив их в пять рядов, по четыре розы в каждом ряду. потом он решил вырастить двадцать пять кустов тюльпанов, расположив их в двенадцать рядов, по пять кустов в каждом ряду. садовнику
begin writeln('Введите количество членов последовательности k'); readln(k); s := 20; for i := 1 to k do s := s + 1 / (i * k); writeln('Сумма последовательности равна ', s) end.
Тестовый пример:
Введите количество членов последовательности k 10 Сумма последовательности равна 20.2928968253968
Варианты, дающие те же результаты: var i, k: longint; s: real;
begin writeln('Введите количество членов последовательности k'); readln(k); s := 20; i:=1; while i<=k do begin s := s + 1 / (i * k); i:=i+1 end; writeln('Сумма последовательности равна ', s) end.
var i, k: longint; s: real;
begin writeln('Введите количестко членов последовательности k'); readln(k); s := 20; i:=1; repeat s := s + 1 / (i * k); i:=i+1 until i>k; writeln('Сумма последовательности равна ', s) end.
1. Алгоритм. 2. Исполнителя характеризуют среда, элементарные действия, отказы и система команд исполнителя (СКИ). 3. После вызова команды исполнитель совершает соответствующее ей элементарное действие (см. 2). 4. Набор понятных исполнителю команд называется системой команд исполнителя (СКИ). 5. Исполнение без вникания в смысл поставленной задачи, лишь строго выполняя действия, содержащиеся в алгоритме и их последовательность. 6. Понятность для исполнителя, дискретность, определённость (детерминированность), конечность, результативность и массовость.
25 кустов в 12 рядов по 5 в каждом - это сложнее.
Получилось, примерно как на Рисунке 2.