1. Леспромхоз ведет промышленную заготовку древесины. Ежегодный план составляет N м3. За год лес естественным путем прирастает на 2,5%. Сколько лет сможет вести работу леспромхоз, если запасы леса на данный момент составляют 150000 м3? Каким должен быть план, чтобы древесины хватило на 100 лет работы?
2. Напечатать таблицу перевода расстояний в дюймах в сантиметры для значений от 1 до 10 дюймов с шагом 0,5 дюйм ( 1 дюйм=2,54 см)
Другие языки программирования и технологии
C# программирование, задачи циклы, помоги очень прошу!!! =)
2. Напечатать таблицу перевода расстояний в дюймах в сантиметры для значений от 1 до 10 дюймов с шагом 0,5 дюйм ( 1 дюйм=2,54 см)
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace PROG
{
class Program
{
static void Main(string[] args)
{
double dDuim = 2.54;
double count = 1;
while (count <= 10)
{
Console.WriteLine("{0}д = {1}см", count, count * dDuim);
count += 0.5;
}
Console.ReadKey();
}
}
}
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace PROG
{
class Program
{
static void Main(string[] args)
{
double dDuim = 2.54;
double count = 1;
while (count <= 10)
{
Console.WriteLine("{0}д = {1}см", count, count * dDuim);
count += 0.5;
}
Console.ReadKey();
}
}
}
Денег дашь?
program duym;
var length:real;i:integer;
begin
for i:=1 to 50 do
begin
length:=(1+0.2*i)*2.54;
write(length:4:4,'cm; ');
end;
writeln;
end.
Александр - это разве Си Шарп? А почему он на Делфи похож? :)))
var length:real;i:integer;
begin
for i:=1 to 50 do
begin
length:=(1+0.2*i)*2.54;
write(length:4:4,'cm; ');
end;
writeln;
end.
Александр - это разве Си Шарп? А почему он на Делфи похож? :)))
Примерно ка кто так
program duym;
var length:real;i:integer;
begin
for i:=1 to 50 do
begin
length:=(1+0.2*i)*2.54;
write(length:4:4,'cm; ');
end;
writeln;
end.
program duym;
var length:real;i:integer;
begin
for i:=1 to 50 do
begin
length:=(1+0.2*i)*2.54;
write(length:4:4,'cm; ');
end;
writeln;
end.
Я всё сделаю в лучшем виде, если за это мне что-то заплатят.
В противном случае пишите сами, выкладывайте код что у вас вышло. И тут разберёмся где ошибки.
Второй вариант для мозгов полезнее.
В противном случае пишите сами, выкладывайте код что у вас вышло. И тут разберёмся где ошибки.
Второй вариант для мозгов полезнее.
double d = 2.54;
string f;
Console.WriteLine("Введите 1 или 2 (1 - дюймы в см, 2 - см в дюймы)");
f = Console.ReadLine();
if (f == "1")
{
Console.WriteLine("Введите кол-во дюйм");
double a = double.Parse(Console.ReadLine());
a *= d;
Console.WriteLine(a + " см");
}
else if (f == "2")
{
Console.WriteLine("Введите кол-во см");
double a = double.Parse(Console.ReadLine());
a /= d;
Console.WriteLine(a + " дюйм (а)");
string f;
Console.WriteLine("Введите 1 или 2 (1 - дюймы в см, 2 - см в дюймы)");
f = Console.ReadLine();
if (f == "1")
{
Console.WriteLine("Введите кол-во дюйм");
double a = double.Parse(Console.ReadLine());
a *= d;
Console.WriteLine(a + " см");
}
else if (f == "2")
{
Console.WriteLine("Введите кол-во см");
double a = double.Parse(Console.ReadLine());
a /= d;
Console.WriteLine(a + " дюйм (а)");
Похожие вопросы
- Программирование задач на языке программирования C++.
- программирование с++. циклы
- Программирование c++. Решение задачи
- Решение задач по программированию в VBA...помогите....Пожалуйста
- Помогите пожалуйста найти ошибку в решении задачи по информатике(паскаль) !!!Прошу очень нужно!!!задача простая!!!
- Помогите Пожалуйста....не могу настроить сеть между 2-я компютерами... очень прошу кто шарит загляньте...
- Пожалуйста, очень прошу, помогите, кто разбирается в программировании
- Очень прошу помочь написать программу на c++.
- Очень прошу помочь написать программу на c++.
- Помогите с задачей по информатике. Срочно прошу.