Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
PascalABC.NET Переделать программу из процедуры в функцию https://www.cyberforum.ru/ pascalabc-net/ thread1620843.html
program v7; uses crt; var a1,b1,c1,a2,b2,c2,S1,S2:real; procedure pl( a,b,c:real; var S:real); var p:real; begin p:=(a+b+c)/2; S:=sqrt(p*(p-a)*(p-b)*(p-c)); writeln('S= ',S:3:2); end;
PascalABC.NET Найти повторяющиеся элементы массива и количество повторений каждого из таких элементов
В произвольном массиве из n целых чисел (n<100) найти повторяющиеся элементы и количество повторений каждого из таких элементов. Исходные данные Первая строка содержит количество элементов массива n. Затем следуют элементы массива (целые числа), каждый в отдельной строке. Результат Первая строка должна содержать количество повторяющихся элементов в массиве, если повторяющихся элементов...
PascalABC.NET Найти количество и сумму Дано натуральное число .Найти количество и сумму цифр в записи этого числа https://www.cyberforum.ru/ pascalabc-net/ thread1620784.html PascalABC.NET Найти произведение https://www.cyberforum.ru/ pascalabc-net/ thread1620775.html
y=\prod_{k=1}^{9}(2+\frac{x}{k}) k нужно вводить с клавиатуры
Вывести подряд буквы от 'z' до 'a' PascalABC.NET
Вывести подряд все буквы от 'z' до 'a'.
PascalABC.NET Вычислить с точностью e=0.001 https://www.cyberforum.ru/ pascalabc-net/ thread1620751.html
Даны действительные числа x и e (x <>0, e > 0) . Вычислить с точностью e=0.001. Алгебраическая сумма (K:=1...бесконечность)(-1^k*x^(4*k+3)/(4*K-3)!
PascalABC.NET Моделирование падения шарика на наклонную плоскость смоделировать падение шарика на 30-градусную наклонную плоскость с коэф восстановления e=0,8. https://www.cyberforum.ru/ pascalabc-net/ thread1620736.html Тема: Сортировка элементов массива PascalABC.NET
Дан массив А. Выполнить сортировку элементов массива по убыванию. Вывести новый массив на печать. Определить номер элемента а в новом массиве.
PascalABC.NET Вычисление суммы первых N членов ряда нечетных чисел 2. Написать программу, которая вычисляет сумму первых N членов ряда 1, 3, 5, 7 ... Исходные данные (N – количество суммируемых членов ряда) вводятся из файла Input.txt. Результаты работы программы добавляются в файл Out.txt. https://www.cyberforum.ru/ pascalabc-net/ thread1620550.html PascalABC.NET Найти два минимальных элемента в последней строке матрицы https://www.cyberforum.ru/ pascalabc-net/ thread1620495.html
Найти два минимальных элемента в последний строке массива А.
PascalABC.NET Вывести на печать целые положительные кратные 9, числа пока истинно условие m<=100.
Вывести на печать целые положительные кратные 9, числа пока истинно условие m<=100.
PascalABC.NET задача из егэ https://www.cyberforum.ru/ pascalabc-net/ thread1620307.html
программа нахождения последовательности n+2/n*(n-1)
318 / 208 / 162
Регистрация: 08.12.2015
Сообщений: 863
21.12.2015, 18:53 0

Определить, за сколько дней может похудеть спортсмен со 100 до 80 кг - PascalABC.NET - Ответ 8524393

21.12.2015, 18:53. Показов 3446. Ответов 4
Метки (Все метки)

Ответ

inc это увеличение на единицу, замените на k:=k+1
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var
n:real;
begin
 n:=100;
 var k:=0;
While n>80 do
Begin
  n:=n-n / 100;
  k:=k+1;
 end;
Writeln(k);
end.


Вернуться к обсуждению:
Определить, за сколько дней может похудеть спортсмен со 100 до 80 кг PascalABC.NET
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.12.2015, 18:53
Готовые ответы и решения:

Определить, за сколько дней спортсмен пробежит Х км
В первый день спортсмен пробежал М километров, а затем он каждый день увеличивал пробег на 8% от...

Определить, через сколько дней спортсмен будет пробегать больше 20 км
Здравствуйте! Я бы хотела решить задачу про спортсмена, пробегавшего 10 километров во время...

Определить, через сколько дней спортсмен пробежит суммарный путь не менее 100 км?
Помогите много пропустил по болезни, теперь догоняю,а завтра уже сдавать.. Начав тренировки,...

Определить через сколько дней спортсмен пробежит суммарный путь более 100 км
8. Спортсмен в первый день пробежал 10 км. Каждый следующий день он увеличивал норму на 10% от...

4
21.12.2015, 18:53
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.12.2015, 18:53
Помогаю со студенческими работами здесь

Через сколько дней спортсмен пробежит суммарный путь 100 км.
Начав тренировки, спортсмен в первый день пробежал 10 км. Каждый следующий день он увеличивал...

Определить, сколько дней тренировался спортсмен
На эту задачу вы уже давали ответ, но мне надо бы по другому.. Выручите пожалуйста, очень нужна эта...

Определить, через сколько дней спортсмен будет пробегать больше 20 км
Начав тренировки,спортсмен в первый день пробежал 10 км.Каждый следующий день он увеличивал...

Определить через сколько дней спортсмен пробежит суммарный путь более N км
Имя входного файла z261.in Имя выходного файла z261.out Спортсмен в первый день пробежал 10 км....

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru