Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.86/7: Рейтинг темы: голосов - 7, средняя оценка - 4.86
7 / 2 / 0
Регистрация: 08.01.2017
Сообщений: 33
1

Составить алгоритм для вычисления стоимости мебельного гарнитура

08.01.2017, 19:58. Просмотров 1347. Ответов 9
Метки нет (Все метки)

Всем привет! Помогите пожалуйста решить задачу в Паскале.
Задача: Составить алгоритм для вычисления стоимости мебельного гарнитура, содержащего 6-стульев, 2-кравати, 1-стол.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
08.01.2017, 19:58
Ответы с готовыми решениями:

Вычислить стоимость мебельного гарнитура,содержащего 4 стула,2 кресла и 1 стол
Привет всем! Я совсем ноль в программировании.Помогите,пожалуйста составить алгоритм в QBasic )Хотя...

Выбрать алгоритм и составить его блок-схему для вычисления значения указанной функции.Составить программу вычисления
Пожалуйста,помогите!!!

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

Составить блок-схему, алгоритм вычисления и программу для вычисления значения кусочно заданной функции
помогите пожалуйста =) заранее благодарен =) П.5.19.Правил Запрещено создавать темы в виде ссылок...

9
6 / 6 / 3
Регистрация: 09.11.2014
Сообщений: 25
08.01.2017, 20:52 2
Насолько была описана задача, настолько решил:
Pascal
1
2
3
4
5
6
7
8
9
10
11
var
  price:array [1..3] of real;
  all: real;
const stul = 6; krov = 2; stol = 1;
begin
  Write('Цена стула: '); Readln(price[1]);
  Write('Цена кровати: '); Readln(price[2]);
  Write('Цена стола: '); Readln(price[3]);
  all := stul * price[1] + krov * price[2] + stol * price[3];
  Write('Цена мебельного гарнитура - ' + all);
end.
1
7 / 2 / 0
Регистрация: 08.01.2017
Сообщений: 33
08.01.2017, 21:02  [ТС] 3
Спасибо огромное !вы меня выручили
0
Модератор
61621 / 46132 / 31840
Регистрация: 18.05.2008
Сообщений: 111,228
09.01.2017, 11:02 4
И здесь массив нафиг не нужен. Помешался что ли на них?
0
7 / 2 / 0
Регистрация: 08.01.2017
Сообщений: 33
09.01.2017, 16:35  [ТС] 5
Puporev, а без массива как ?
0
Модератор
61621 / 46132 / 31840
Регистрация: 18.05.2008
Сообщений: 111,228
09.01.2017, 17:24 6
Pascal
1
2
3
4
5
6
7
8
var stul,k,stol,all: real;
begin
  Write('Цена стула: '); Readln(stul);
  Write('Цена кровати: '); Readln(k);
  Write('Цена стола: '); Readln(stol);
  all := stul*6+k*2+stol;
  Write('Цена мебельного гарнитура=',all);
end.
0
7 / 2 / 0
Регистрация: 08.01.2017
Сообщений: 33
09.01.2017, 21:16  [ТС] 7
Puporev, спасибо большое
0
кот Бегемот
09.01.2017, 22:19
  #8

Не по теме:

Офигеть, сложнейшая задача. Для 5 класса или для 6-го?

0
Модератор
Эксперт Pascal/DelphiЭксперт NIX
5583 / 3318 / 2403
Регистрация: 22.11.2013
Сообщений: 9,363
09.01.2017, 22:52 9
Pascal
1
2
3
4
5
6
const na=6; nb=2; nc=1;
var a, b, c: Real;
begin
  Write('Цены стула, кровати, стола: '); ReadLn(a,b,c);
  WriteLn('Цена гарнитура (стульев: ',na,', кроватей: ',nb,', столов: ',nc,'): ',a*na+b*nb+c*nc:0:2);
end.
0
7 / 2 / 0
Регистрация: 08.01.2017
Сообщений: 33
10.01.2017, 12:30  [ТС] 10
bormant, Спасибо
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
10.01.2017, 12:30

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Составить алгоритм-вычисление квадрата суммы двух чисел и алгоритм для вычисления функции
Здравствуйте!Мне нужно все с самого начала и точно,помогите пожалуйста! 1.составить...

Составить алгоритм для вычисления функции, составить 2 блок-схемы
Добрый день товарищи, очень нужна ваша помощь. Учусь на первом курсе в институте и у нас есть...

составить алгоритм для вычисления функции
составить алгоритм для вычисления функции 2x+1,если х больше нуля y= cosХ,если х...

Составить алгоритм для вычисления функции
Здравствуйте. Помогите составить алгоритм функции. ┌ 1 │ ------ , если...


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

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

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