Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
toothcomp
0 / 0 / 0
Регистрация: 29.12.2010
Сообщений: 33
#1

Определить виды товаров, общая стоимость которых не превышает S - Pascal ABC

08.01.2011, 22:54. Просмотров 340. Ответов 1
Метки нет (Все метки)

Помогите бьюсь не могу ничего понять как сделать
Фирма располагает следующей информацией: наименование товара, стоимость его единицы, количество единиц (кг, шт., упаковок) в партии, название фирмы-поставщика, поставившего данную партию товара. Данные вводятся с клавиатуры: не менее 5 товаров от не менее, чем 2 фирм-поставщиков (один и тот же товар может поставляться разными поставщиками). На основе исходных данных во всех программах сформировать и вывести таблицу. Кроме того Определить виды товаров, общая стоимость которых не превышает S.
Всё решение должно строится на одномерных массивах.. S это как я понял величина которую можно задать с клавиатуры..
Заранее спасибо
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
08.01.2011, 22:54
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Определить виды товаров, общая стоимость которых не превышает S (Pascal ABC):

Определить виды товаров, общая стоимость которых не превышает S - Pascal ABC
Задачку помогите решить милые люди ПОЖАЛУЙСТА Фирма располагает следующей информацией: наименование товара, стоимость его единицы,...

Дан массив цен n товаров. Определить среднюю стоимость товаров - Pascal
разработать программу для слудующей задачи,Дан массив цен n товаров.Определить среднюю стоимость товаров,цена которых находится в заданном...

Напечатать стоимость каждого из автомобилей, в которых мощность двигателя не превышает 80 л.с. - Pascal
Известны данные о мощности двигателя (в л.с.) и стоимости 30-ти маркам легковых автомобилей. Напечатать стоимость каждого из автомобилей, в...

Вывести названия игрушек, которые подходят детям N лет, и стоимость которых не превышает M. - Pascal ABC
Создать файл f с информацией про игрушки: название, стоимость, возрастные рамки детей, для которых предназначена игрушка. Вывести названия...

Вывести стоимость всех товаров в начале рабочего дня и стоимость всех не проданных товаров. - Pascal ABC
Продаются товары двух видов. Запросить с клавиатуры для каждого вида товаров цену, количество в начале рабочего дня и количество проданного...

Верно ли, что средняя стоимость автомобилей превышает среднюю стоимость мотоциклов - Pascal
Известны стоимости нескольких марок легковых автомобилей и мотоциклов. Верно ли, что средняя стоимость автомобилей превышает среднюю...

1
kz-gold
5 / 5 / 3
Регистрация: 06.03.2010
Сообщений: 27
09.01.2011, 07:12 #2
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
program tovar;
const
max=5;
type
tovar=record
name:string;
cena:integer;
kol:integer;
firm:string;
end;
myarray=array[1..max] of tovar;
var 
myarr:myarray;
s:integer;
i:integer;
begin
writeln('vedite znachenie s');
readln(s);
for i:=1 to max do
begin
with myarr[i] do
begin
writeln('vedite imya');
readln(name);
writeln('vedite cenu');
readln(cena);
writeln ('vedite kol');
readln(kol);
writeln('nazvanie firmi postavshika');
readln(firm);
end;
if myarr[i].cena>s then 
writeln (myarr[i].name);
end;
end.
насчет таблицы не понял че за таблица?
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
09.01.2011, 07:12
Привет! Вот еще темы с ответами:

Определить количество дней, в которые стоимость проданных товаров превысила значение s - Pascal
В массиве хранятся сведения об общей стоимости товаров, проданных фирмой за каждый день марта. Определить количество дней, в которые...

Определить общую стоимость тех товаров которые стоят дороже 1000 рублей - составить блок схему - Pascal ABC
Известны данные о стоимости каждого из 12 наименований товара определить общую стоимость тех товаров которые стоят дороже 1000 рублей.

Определить количество учащихся класса, рост которых превышает a см - Pascal ABC
В ЭВМ вводятся по очереди данные о росте N учащихся. Определить коли- чество учащихся класса, рост которых превышает a см

Определить количество учеников, рост которых не превышает заданного значения - Pascal
Рост 22 учеников класса представлен в виде массива. Определить количество учеников, рост которых не превышает значения r.


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

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

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