База данных видеокамер, замеряющих скорости автомобилей

@banda · Регистрация: 06.02.2011

Author24 — интернет-сервис помощи студентам

Нужно вывести номера в которых сложены цифры

Input.txt
a111aa78 2000
o000oo00 100
a234bv56 200
a111aa78 1000
o000oo00 300
b7777999 0

Output.txt
a111aa78 3000
o000oo00 400
a234bv56 200
b7777999 0

@Puporev · 13.02.2012, 09:58

banda, А полное условие задачи можно, или оно секретное?

@Mawrat · 13.02.2012, 15:19

Юр, как я понял, надо сложить числа по всем строкам, где одинаковые начальные части. Например:
Дано:

Код

a111aa78 2000
o000oo00 100
a111aa78 1000
o000oo00 300

Ответ:

Код

a111aa78 3000
o000oo00 400

@Puporev · 13.02.2012, 15:25

Но в примере выводятся и тегде не было сложения. В принципе догадаться можно, но зачем? Из-за того что автору влом даже задание написать?

@banda · 13.02.2012, 18:15 **[ТС]**

Половину задачи я сделал
Осталась эта часть
Не понимаю зачем вам полное условие, я наоборот не хотел загромождать тему текстом

Раз надо, держите

База данных видеокамер, замеряющих скорости автомобилей содержит N записей о номерах проехавших автомобилей и их скорости в момент съемки. Известна таблица штрафов за превышение допустимой скорости:

скорость	штраф
от 0 до 70 км/ч	нет штрафа (0 рублей)
от 71 до 80 км/ч	100 рублей
от 81 до 100 км/ч	300 рублей
от 101 до 120 км/ч	1000 рублей
от 121 км/ч	2000 рублей

Необходимо для каждого зафиксированного камерой номера автомобиля определить суммарный штраф и вывести такой список в порядке убывания штрафов.

Формат входного файла

В первой строке входного файла Input.txt находится целое число N (1 ≤ N ≤ 100). Следующие N строк входного файла содержат описания проехавших автомобилей — сначала номер автомобиля — строка, состоящая из 8 маленьких латинских букв или цифр, потом через пробел одно целое число Vi (0 ≤ Vi ≤ 250) — зафиксированная скорость в км/ч.

Формат выходного файла

В выходной файл Output.txt для каждого зафиксированного на камеру автомобиля выведите сначала номер автомобиля, потом через пробел суммарный штраф. Этот список необходимо вывести в порядке убывания суммарного штрафа. В случае нескольких автомобилей с одинаковым суммарным штрафом, их можно вывести в любом порядке.

Пример входных и выходных данных

Input.txt
5
a111aa78 150
o000oo00 70
a234bv56 65
a111aa78 110
o000oo00 83

Output.txt

a111aa78 3000

o000oo00 300

a234bv56 0

@Puporev · 13.02.2012, 20:47

Pascal

uses crt;
type auto=record
          nom:string;
          sht:integer;
          end;
var f,g:text;
    a:array[1..100] of auto;
    s,s1:string;
    n,k,i,j,c,p,r:integer;
    x:auto;
begin
clrscr;
assign(f,'input.txt');
reset(f);
assign(g,'output.txt');
rewrite(g);
read(f,n);
readln(f,s);
readln(f,s);
k:=1;
a[k].nom:=copy(s,1,8);
delete(s,1,9);
val(s,a[k].sht,c);
for i:=2 to n do
 begin
  readln(f,s);
  s1:=copy(s,1,8);
  delete(s,1,9);
  val(s,r,c);
  p:=0;
  j:=1;
  while(j<=k) and(p=0) do
  if s1=a[j].nom then
   begin
    p:=j;
    a[p].sht:=a[p].sht+r
   end
  else j:=j+1;
  if p=0 then
   begin
    k:=k+1;
    a[k].nom:=s1;
    a[k].sht:=r;
   end;
 end;
close(f);
for i:=1 to k-1 do
for j:=i+1 to k do
if a[i].sht<a[j].sht then
 begin
  x:=a[i];
  a[i]:=a[j];
  a[j]:=x;
 end;
for i:=1 to k do
begin
writeln(g,a[i].nom,' ',a[i].sht);
writeln(a[i].nom,' ',a[i].sht);
end;
close(g);
readln
end.

@banda · 14.02.2012, 08:06 **[ТС]**

Сообщение от Puporev

a[k].sht

А что это такое?
Раньше не встречался

@Puporev · 14.02.2012, 08:30

Почитайте про записи тип record

@banda 1 / 1 / 0 Регистрация: 06.02.2011 Сообщений: 46
		1
	База данных видеокамер, замеряющих скорости автомобилей 12.02.2012, 22:11. Показов 2913. Ответов 7 Метки нет (Все метки) Нужно вывести номера в которых сложены цифры Input.txt a111aa78 2000 o000oo00 100 a234bv56 200 a111aa78 1000 o000oo00 300 b7777999 0 Output.txt a111aa78 3000 o000oo00 400 a234bv56 200 b7777999 0 0

@Puporev Почетный модератор 64299 / 47594 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	13.02.2012, 09:58	2
	banda, А полное условие задачи можно, или оно секретное? 0

@Mawrat 13104 / 5885 / 1706 Регистрация: 19.09.2009 Сообщений: 8,808
	13.02.2012, 15:19	3
	Юр, как я понял, надо сложить числа по всем строкам, где одинаковые начальные части. Например: Дано: Код a111aa78 2000 o000oo00 100 a111aa78 1000 o000oo00 300 Ответ: Код a111aa78 3000 o000oo00 400 0

@Puporev Почетный модератор 64299 / 47594 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	13.02.2012, 15:25	4
	Но в примере выводятся и тегде не было сложения. В принципе догадаться можно, но зачем? Из-за того что автору влом даже задание написать? 0

@banda 1 / 1 / 0 Регистрация: 06.02.2011 Сообщений: 46
	14.02.2012, 08:06 [ТС]	7
	Сообщение от Puporev a[k].sht А что это такое? Раньше не встречался 0

@Puporev Почетный модератор 64299 / 47594 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	14.02.2012, 08:30	8
	Почитайте про записи тип record 0

Опции темы