mirsanm26249
?>

Написать программу для решения следующей : учебным заведением был приобретен стол за s руб. его амортизация составляет 12% в год. определить, сколько он будет стоить через n лет. (pascal) пример: введите стоимость стола : 35000 введите кол-во лет : 5 стоимость стола на конец 1 года : 30800.000рублей стоимость стола на конец 2 года : 27104.000рублей стоимость стола на конец 3 года : 23851.520рублей стоимость стола на конец 4 года : 20989.338рублей стоимость стола на конец 5 года : 18470.617рублей

Информатика

Ответы

Dato24043846
Var   years,i:integer;   Ststola,a,s:real;begin     writeln('Ââåäèòå ñòî-òü ñòîëà:');     readln(Ststola);     writeln('Ââåäèòå êîë-âî ëåò:');     readln(years);     s:=0;     for i:=1 to years do         begin             a:=Ststola*0.12;             a:=Ststola-a;             Ststola:=a;             Writeln('Стоимость стола через ', i, ' лет ', a);         end;end.
Потапова 79275136869323
Program p1;
var k,t:integer;
begin
write('кг = ');
readln(k);
t:=k div 1000;
writeln('В ',k,' кг полных тонн ',t);
end.

Пример:
кг = 54937
В 54937 кг полных тонн 54

program p2;
var a,b,k:integer;
begin
a:=543;
b:=130;
k:=a div b;
writeln('Количество квадратов = ',k);
end.

Результат:
Количество квадратов = 4

program p3;
var a,b:integer;
begin
write('Введите четырехзначное число: ');
readln(a);
b:=9*10000+a;
writeln('Полученное число = ',b);
end.

Пример:
Введите четырехзначное число: 4937
Полученное число = 94937

program p4;
var a,b:integer;
begin
write('Введите трехзначное число: ');
readln(a);
b:=(a mod 100)*10 + a div 100;
writeln('Полученное число = ',b);
end.

Пример:
Введите трехзначное число: 437
Полученное число = 374

program p5;
var v1,v2,v3,t1,t2,t3,s:real;
begin
write('v1, t1: ');
readln(v1,t1);
write('v2, t2: ');
readln(v2,t2);
write('v3, t3: ');
readln(v3,t3);
s:=v1*t1+v2*t2+v3*t3;
writeln('Пройденный путь = ',s:5:2, ' км ');
end.

Пример:
v1, t1: 5 2
v2, t2: 3 0.5
v3, t3: 4 1.5
Пройденный путь = 17.50 км
oslopovavera

Python

n=int(input())

if n>1 and n<10 or n==1:

   print(1)

elif n>10 and n<100 or n==10 :

   print(2)

elif n>100 and n<1000 or n==100 :

   print(3)

elif n>1000 and n<10000 or n==1000:

   print(4)

elif n>10000 and n<100000 or n==10000:

   print(5)

elif n>100000 and n<1000000 or n==100000:

   print(6)

elif n>1000000 and n<10000000 or n==1000000:

   print(7)

elif n>10000000 and n<100000000 or n==10000000:

   print(8)

elif n>100000000 and n<1000000000 or n==100000000:

   print(9)

elif n>1000000000 and n<10000000000 or n==1000000000:

   print(10)

else:

   print(0)

СДЕЛАЙ ОТВЕТ ЛУЧШИМ!

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Написать программу для решения следующей : учебным заведением был приобретен стол за s руб. его амортизация составляет 12% в год. определить, сколько он будет стоить через n лет. (pascal) пример: введите стоимость стола : 35000 введите кол-во лет : 5 стоимость стола на конец 1 года : 30800.000рублей стоимость стола на конец 2 года : 27104.000рублей стоимость стола на конец 3 года : 23851.520рублей стоимость стола на конец 4 года : 20989.338рублей стоимость стола на конец 5 года : 18470.617рублей
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

nmakarchuk
kayrina
ribcage52
Геннадьевна Вета560
Alex-kustov
О. Карпов1691
Анна егорович526
suxoruchenkovm171
papushinrv4985
peshnoshamon
panasenko68
ganorussia
Sergei-Gradus199
Евгеньевич-Куликов1614
Найдите значение x в неравенстве 634 8
alf206