Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal Scrabble игра слов https://www.cyberforum.ru/ pascal/ thread651813.html Задание: Создать программу для решения задачи построения слова из некоторого множества букв (игра Scrabble) используя алгоритмы поиска в глубину и в ширину. Длина слова не менее 5 букв. Заранее спасибо	Учебник pascal Pascal Хочу начать учить паскаль для собственного саморазвития так сказать =) Не подскажите ли хороший учебник?
Pascal Перевести из С в Паскаль https://www.cyberforum.ru/ pascal/ thread651613.html Заранее спасибо /Заменить в строке последовательности одинаковых символов на число, соответствующее их количеству (т.е. “ abcdaaaaa xyznnnnnnn ” на “abcd5a xyz7n ” / /* G++/Code::Blocks */ #include <stdio.h> #include <stdlib.h> int main(void) {	Pascal Определить номер первого отрицательного элемента, делящегося на 5 с остатком 2 3.Дан одномерный массив MAS ,состоящий из n целых чисел.Определить номер первого отрицательного элемента,делящегося на 5 с остатком 2. Помогите пожалуйсто я уже это писал,завтра сдавать нужно=( И ещё пожалуйсто дайте ссылку где скачать можно (Паскаль)... https://www.cyberforum.ru/ pascal/ thread651458.html
Pascal Найти количество всех отрицательных элементов данного массива 4.Дан двумерный массив размерностью N x M (N и M вводятся с клавиатуры).Найти количество всех отрицательных элементов данного массива.Произвести вывод данного массива в виде матрицы. Помогите пожалуйсто я уже это писал,завтра сдавать нужно=(	Pascal Вычислить произведение элементов массива, расположенных между максимальным и минимальным элементами https://www.cyberforum.ru/ pascal/ thread651445.html Здравствуйте помогите пожалуйсто с задачами:=) 2.В одномерном массиве, состоящем из n вещественных чисел вычислить произведение элементов массива, расположенных между максимальным и минимальным элементами. Буду очень презнателен=) Заранее Спасибо.
Pascal Сформировать одномерный массив, каждый элемент которого равен сумме элементов соответствующнго столбца https://www.cyberforum.ru/ pascal/ thread651437.html Здравствуйте помогите пожалуйсто с задачами:=) 3.Дан двумерный массив.Сформировать одномерный массив, каждый элемент которого равен сумме элементов соответствующнго столбца. Буду очень презнателен=) Заранее Спасибо.	Вычислить сумму элементов матрицы, расположенных выше главной диагонали Pascal Дан массив A вычислить сумму элементов массива расположенную выше левой диагонали.
Pascal Вычислить произведение всех элементов матрицы https://www.cyberforum.ru/ pascal/ thread651295.html Дан массив A вычислить произведение всех элементов этого массива	Pascal Найти количество элементов матрицы, равных числу, введеному с клавиатуры помогите плиз написать программы, очень срочно надо( 1) Написать программу, которая в матрице A находит все элементы равные числу введеному с клавиатуры и подсчитать их колличество. пожалуста помогите, очень нужно( https://www.cyberforum.ru/ pascal/ thread651280.html
Pascal Сжать массив,удалив из него все элементы,модуль которых не превышает единицу Задачи: 2.Дан одномерный массив,состоящий из n вещественных чисел.Сжать массив,удалив из него все элементы,модуль которых не превышает единицу.Освободившиеся в конце массива элементы заполнить нулями. Вот четыре задачи пожалуйсто что можете решите.Данный форум подсказал однокурсник.Говорит что решаете всё быстро и чётко=) Задачи 1 курса техникума..Так что без супер наворотов...	Pascal Найти сумму элементов каждого столбца данного массива Задачи: 3.Дан двумерный массив размерностью N*M (N и M вводятся с клавиатуры).Найти сумму элементов каждого столбца данного массива. пожалуйсто что можете решите.Данный форум подсказал однокурсник.Говорит что решаете всё быстро и чётко=) Задачи 1 курса техникума..Так что без супер наворотов пожалуйсто,если таковые имеются=) Буду очень признателен за проделанную работу=) https://www.cyberforum.ru/ pascal/ thread651088.html

ВАСИЛЕВС

561 / 484 / 168

Регистрация: 14.02.2012

Сообщений: 1,561

16.09.2012, 12:13

Описать тип записи - ведомость о товарах в магазине - Pascal - Ответ 3454648

16.09.2012, 12:13. Показов 1821. Ответов 2

Метки (Все метки)

Сообщение было отмечено nicol-333 как решение

Решение

Pascal

type
  Product = record
    Name: string;
    Price: real;
end;
 
const N = 10;{количество товара}
 
var
  Magazine: array[1..N] of Product;
  
procedure GenerateProduct;
var
  i: integer;
begin
  for i := 1 to N do
    begin
      with Magazine[i] do
        begin
          write('Введите имя продукта: ');
          readLn(Name);
          write('Введите цену: ');
          readLn(Price);
        end;
    end;
end;
 
function GetRevenue: real;
var
  sum: real;
  i: integer;
begin
  for i := 1 to N do
    begin
      with Magazine[i] do
        begin
          sum := sum + Price;
        end;
    end;
  GetRevenue := sum;
end;
 
begin
  GenerateProduct();
  writeLn('Выручка за день: ', GetRevenue());
end.

Наверно так.
P.S. Названия подпрограмм может не подходят. Я английский не очень, брал первое что давал переводчик.

Вернуться к обсуждению:
Описать тип записи - ведомость о товарах в магазине Pascal

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

16.09.2012, 12:13

Готовые ответы и решения:

Рассылка о товарах в магазине
В карточке товара пользователь может подписаться на рассылку. С помощью крона срабатывает скрипт,...

Сведения о товарах в магазине. Используются два файла
В одном файле хранятся сведения о товарах в магазине: код товара, название, количество, цена, во 2...

Создать файл, содержащий сведения о товарах в магазине
Привет ребят. Подсобите с задание, а то понятия не имею как делать! Создать файл, содержащий ...

Создать файл, содержащий сведения о товарах в магазине
Создать файл, содержащий сведения о товарах в магазине: наименование товара, изготовитель, год...

	16.09.2012, 12:13

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

16.09.2012, 12:13

Помогаю со студенческими работами здесь

Массив. Вывести на экран информацию о товарах, продающихся в магазине
Дан массив, в котором хранятся сведение о товарах: название товара, название магазина, в котором...

Составить программу, позволяющую организовать в виде записей данные о товарах в магазине
Здравствуйте! Подскажите пожалуйста, как решить задачку:good: Составить программу, позволяющую...

Описать тип записи Маршрут самолета
Доброе время суток! Помогите пожалуйста найти и исправить ошибку в семестровой работе. Дана...

Описать тип записи комплексное число
Описать тип записи комплексное число. Ввести два комплексных числа и символ, обозначающий одну из...

Наверх