Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
aliev_ravil
0 / 0 / 0
Регистрация: 26.12.2011
Сообщений: 70
1

Определение стоимости ...

27.12.2011, 18:43. Просмотров 1044. Ответов 2
Метки нет (Все метки)

Задание 4
Цена 1 кг сыра k рублей. Составить программу, определяющую стоимость 100 г, 200 г, 300 г, 400 г, 500 г, 600 г, 700 г, 800 г сыра.

Задание 6
Даны действительные числа x, y, z. Вычислить:
min2 (x + y + z/2, x • y • z) + 1.
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.12.2011, 18:43
Ответы с готовыми решениями:

Определение минимального по "стоимости" пути из пункта 1 в пункт N
var A:array of Byte; function Test: Boolean; var i,j:Integer; begin Test:=False; ...

Расчет стоимости
Всем привет. Моя программа выводит данные в richedit и осуществляет поиск по двум критериям.Нужно...

Подсчёт стоимости
Необходимо рассчитать стоимость всего товара (количество умножить на цену и сложить все ячейки)

Вычисление стоимости покупки
Создать проект в ЯП Delphi, вычисления стоимости покупки, с учетом скидки используя компонент...

Расчет стоимости проката
Клиент, обратившийся в пункт, выбирает кассету по каталогу и забирает кассету на определенный срок....

2
Frizar
11 / 11 / 3
Регистрация: 24.04.2011
Сообщений: 117
27.12.2011, 21:05 2
Лучший ответ Сообщение было отмечено aliev_ravil как решение

Решение

Цитата Сообщение от aliev_ravil Посмотреть сообщение
Задание 4
Цена 1 кг сыра k рублей. Составить программу, определяющую стоимость 100 г, 200 г, 300 г, 400 г, 500 г, 600 г, 700 г, 800 г сыра.

.
Я сделал вот так:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
var
 
  cena,massa,otvet:Real;
begin
  cena:=StrToFloat(Edit1.Text); // цена за 1кг
  massa:=StrToFloat(Edit2.Text); // масса сыра
  otvet:=(cena/1000)*massa;
  Label3.Caption:='Сыр массой '+ FloatToStr(massa)+ 'гр '+'будет стоить';
  Edit3.Text:=FloatToStr(otvet)+'руб'; // выводим ответ
end;
 
end.
Вот исходник ещё на всякий.
1
Вложения
Тип файла: rar Стоимость сыра.rar (163.5 Кб, 22 просмотров)
aliev_ravil
0 / 0 / 0
Регистрация: 26.12.2011
Сообщений: 70
27.12.2011, 21:54  [ТС] 3
спс Братан
Выручил
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
27.12.2011, 21:54

Расчёт общей стоимости
Рассчитать общую стоимость всех товаров Умножая каждую цену товара на количество в затем сложить...

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

Конфигуратор стоимости компьютера
Добрый день,мне нужно сделать программу которая будет считать стоимость компьютера. Сделал я...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru