Ответы 2
var k,s,i:integer;
begin
k:=3;
s:=3;
for i:=2 to 7 do
begin
k:=k+1;
s:=s+k;
end;
writeln('Количество выученных слов = ',s);
end.
Результат:
Количество выученных слов = 42
begin
k:=3;
s:=3;
for i:=2 to 7 do
begin
k:=k+1;
s:=s+k;
end;
writeln('Количество выученных слов = ',s);
end.
Результат:
Количество выученных слов = 42
Пусть в первый день ученик выучил k слов.
Тогда за n дней он выучит
[tex]\displaystyle S=\sum_{i=0}^{n-1}(k+i)=kn+\sum_{i=0}^{n-1}i=kn+\frac{0+n-1}{2}n=kn+ \frac{n(n-1)}{2} [/tex]
Теперь можно написать программу. Известно, что k=3, n=7.
Ручной счет дает 3×7+6×7/2 = 21+21 = 42.
// PascalABC.NET 3.3, сборка 1599 от 17.12.2017
// Внимание! Если программа не работает, обновите версию!
begin
var (k,n):=(3,7);
Writeln(k*n+n*(n-1) div 2)
end.
Результат
42
Хорошая иллюстрация случая, когда для решения задачи компьютер не нужен. Так бывает, когда составители заданий думают тем, на чем сидят.
Тогда за n дней он выучит
[tex]\displaystyle S=\sum_{i=0}^{n-1}(k+i)=kn+\sum_{i=0}^{n-1}i=kn+\frac{0+n-1}{2}n=kn+ \frac{n(n-1)}{2} [/tex]
Теперь можно написать программу. Известно, что k=3, n=7.
Ручной счет дает 3×7+6×7/2 = 21+21 = 42.
// PascalABC.NET 3.3, сборка 1599 от 17.12.2017
// Внимание! Если программа не работает, обновите версию!
begin
var (k,n):=(3,7);
Writeln(k*n+n*(n-1) div 2)
end.
Результат
42
Хорошая иллюстрация случая, когда для решения задачи компьютер не нужен. Так бывает, когда составители заданий думают тем, на чем сидят.
Премиум статус
Получайте самые быстрые
ответы на свои вопросы
ответы на свои вопросы
У вас остались
вопросы?
вопросы?
