Лыжник, начав тренировки, в первый день пробежал 10 км. каждый следующий день он увеличивал пробег на 10% от пробега предыдущего дня. сколько км он пробежит за 7 дней? составьте, , программу в паскале.
Это что, надо в виде программы? А так: алгометрическая последовательность: а1=10 q=1(10% от 100) 20=10+d-1 d=11 - через 12 дней(так как на 11-ый он пробежит 20 км) б) Это сумма всех членов ал. посл. s=(2*a1+d(n-1))/2 *n или s=((a1+an)*n)/2 значит 100>((10+n)*n)/2 остальное посчитай сам(а), так как тут трудно писать квадратное уравнение, а если это надо в программу, то введи эту формулу туда и всё.(Хотя какая может быть программа, если всё изначально дано?)
Обычно решают на Pascal, но я напишу на C++, он мне роднее)). Я конечно немножко по-другому реализовал (в плане ввода значений), но поставленную задачу выполняет. 1) #include <stdio.h> #inlcude <conio.h> #include <iostream> using namespace std; int main() { long a, b, i, sum=0; cin>>a; // Вводишь число a cin>>b; // Вводишь число b for (i=a;i<=b;i++) { sum=sum+(i*i); } cout<<sum; // выводим сумму квадратов чисел _getch(); }
2) #include <stdio.h> #inlcude <conio.h> #include <iostream> using namespace std; int main() { long a,b,c,d,i; bool z=false; cin>>a; cin>>b; cin>>c; cin>>d; for (i=10000; i<=99999; i++) { if (i % a==b && i % c==d) {z=true; cout<<i<<" ";} } if (z==false) {cout<<"-1";} // Выводится если нет чисел _getch(); }
1) var a,b,s:integer; begin Readln(a,b); s:=0; if (a<0)and(b<0) then begin a:=-a; b:=-b; end; if a<0 then for var i:=1 to b do s+=a else for var i:=1 to a do s+=b; WriteLn(s); end.
Пример: -7 15 -105
2) var n,s:integer; begin Readln(n); s:=0; for var i:=1 to n do s+=i; WriteLn(s); end.
Пример: 100 5050
3) var a,b,s:integer; begin Readln(a,b); s:=0; for var i:=a to b do s:=s+i*i; writeLn(s); end.
Пример: 2 5 54
4) var a,b,n:integer; begin Readln(a,b,n); for var i:=1 to n do write(random(b-a+1)+a,' '); end.
А так: алгометрическая последовательность:
а1=10 q=1(10% от 100)
20=10+d-1
d=11 - через 12 дней(так как на 11-ый он пробежит 20 км)
б) Это сумма всех членов ал. посл.
s=(2*a1+d(n-1))/2 *n или s=((a1+an)*n)/2
значит 100>((10+n)*n)/2
остальное посчитай сам(а), так как тут трудно писать квадратное уравнение, а если это надо в программу, то введи эту формулу туда и всё.(Хотя какая может быть программа, если всё изначально дано?)