Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 976 ответов!

Turbo Pascal.

5-9 класс

Спортсмен пробежал 10 км в первый день.Каждый следующий день он увеличивал норму на 10% от нормы предыдущего дня. Определить:
a) Через сколько дней он будет пробегать не более 20 км?
б) Сколько километров он пробежит на 7-ой день?

Shaaaaaarik 26 июня 2014 г., 14:38:18 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Аlenary
26 июня 2014 г., 17:35:57 (9 лет назад)

var k,L,N:real;
i:integer;
begin
read(L);
read(N);
k:=0.0;
for i:=1 to N do begin
k:=k+L;
L:= L*1.1;
end;
writeln(k);
end.

на C/C++

int main()
{
double k=0.0, L, N;
std::cin>>L>>N;
for(int i=0; i<N; i++)
{
k += L;
L *= 1.1;
}
cout<<k;

Ответить

Другие вопросы из категории

В воскресенье 19 студентов побывали в планетарии, 10 – в цирке и 6

– музее. Планетарий и цирк посетили 5 студентов; планетарий и музей -3; цирк и музей -1. Сколько студентов в группе, если никто не
успел посетить все три места, а три студента не посетили ни одного
места? Напишите пожалуйста решение.

Для шифрования числового кода решили использовать изображение круглых часов с циферблатом и с тремя стрелками (часовой, минутной и секундной), и

в качестве значений цифр решили брать положения этих стрелок (произвольные, не зависящие друг от друга – нет механической связи) относительно секундной шкалы (12 делений – значения от 0 до 11,вертикальное положение любой стрелки соответствует нулевому значению) и закадированные в соответствующей системе счисления, то есть в системе счисления использующей строго такое же количество цифр. При шифровании получается число, каждый из разрядов которого может принимать значение от 0 до 11. Младший разряд шифрованного числа соответствует значению циферблата, указываемому секундной стрелкой, средний – минутной, старший – часовой. Зашифрованное число перевели в десятичную систему счисления.

Читайте также

1.Какое значение переменной S будет напечатано после выполнения фрагмента программы,записанной на языке программирования TURBO PASCAL:A:=2В: = 3;

if A>B then S: = A+B;
writeln (S);
Варианты ответов:1)5 ;2)6; 3)7; 4)8

2. Какое значение переменной S будет напечатано после выполнения фрагмента программы, записанной на языке программирования PASCAL:
S: =1;
N: =1;
while N<=3 do
begin
S: = S*N;
N: = N+1;
end;
writeln(S);
Варианты ответов: 1)2 ; 2)1; 3)0; 4)4

Помогите, пожалуйста, выполнит задания, связанные с Turbo Pascal: 1) Определить, что будет напечатано

в результате работы следующего фрагмента программы:

var k,s:integer;

begin

s:=0;

k:=1;

while k<11 do begin

s:=s+k;

k:=K+1;

end;

write(s);

end.

1.1 Запишите этот же фрагмент с помощью оператора Repeat...until

2) Значения двух массивов A[1..100] и B[1..100] задаются с помощью следующего фрагмента программы:

for n:=1 to 100 do

A[n]:=n-10;

for n:=1 to 100 do

B[n]:=A[n]*n;

Сколько элементов массива B будут иметь положительные значения?

а)10 б)50 в)90 г)100



Вы находитесь на странице вопроса "Turbo Pascal.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.