Обсуждение @ 1228. Массив @ Timus Online Judge

Felix_Mate No subject // Задача 1228. Массив 1 фев 2017 17:12

Destiny My Solution Here: [8] // Задача 1228. Массив 14 ноя 2002 07:19

program arrays;
var
k:array[1..20]of longint;
d:array[0..20]of longint;
n:integer;
s:longint;
procedure init;
var
i:integer;
begin
readln(n,s);
for i:=1 to n do
readln(d[i]);
d[0]:=s;
end;
procedure solve;
var
i:integer;
begin
k[n]:=d[n-1]-1;
for i:=n-1 downto 1 do
k[i]:=(d[i-1] div d[i])-1;
for i:=1 to n-1 do
write(k[i],' ');
writeln(k[n]);
end;
begin
init;
solve;
end.

Coldfeel mine???shorter [2] // Задача 1228. Массив 21 ноя 2002 21:31

const maxn=20;
var w,n,i:longint;
    a,b:array [1..maxn] of longint;
begin
    readln(w,n);
    for i:=1 to w do readln(a[i]);
    n:=n-1;i:=1;
    repeat
    b[i]:=n div a[i];
    n:=n mod a[i];
    inc(i);
    until n=0;
    for i:=1 to w do write(b[i],' ');
end.

Coldfeel there are something i feel wrong but hard to say though i got AC // Задача 1228. Массив 21 ноя 2002 21:33

Coldfeel my program is wrong.but i don't know why it got AC...??? // Задача 1228. Массив 21 ноя 2002 21:50

> const maxn=20;
> var w,n,i:longint;
>     a,b:array [1..maxn] of longint;
> begin
>     readln(w,n);
>     for i:=1 to w do readln(a[i]);
>     n:=n-1;i:=1;
>     repeat
>     b[i]:=n div a[i];
>     n:=n mod a[i];
>     inc(i);
>     until n=0;
>     for i:=1 to w do write(b[i],' ');
> end.

Kolyanich what about mine? // Задача 1228. Массив 24 дек 2002 13:41

#include <fstream.h>

void main()
{
    int n, s, t, i;
    cin >> n >> s;

    for(i=0; i<n; i++) {
        cin >> t; cout << (s / t) - 1 << " "; s = t;
    }
}

Oyh Shoter and shoter [1] // Задача 1228. Массив 11 мар 2009 10:42

var
n,s,d:longint;
begin
readln(n,s);
dec(s);
for n:=1 to n do
    begin
      readln(d);
      write(s div d,' ');
      s:=s mod d;
    end;
end.

Abbos Re: Shoter and shoter // Задача 1228. Массив 31 июл 2016 12:15

What is the use of showing you and your code off ?

Abbos Re: My Solution Here: // Задача 1228. Массив 31 июл 2016 12:17

Instead of getting proud of yourself, giving clarification is much more better

Abbos Re: My Solution Here: // Задача 1228. Массив 31 июл 2016 12:18

Instead of getting proud of yourself and giving right code, giving clarification is much more better

[RISE] Levon Oganesyan [RAU] Good problem! AC in 0.015 // Задача 1228. Массив 3 фев 2014 23:45

Komendantian Grant Mikaelovich SSAU Brainbreaking text, brainless task. [7] // Задача 1228. Массив 2 дек 2006 23:00

Stolyarov Artyom WA#1 // Задача 1228. Массив 28 июл 2013 19:11

IRAKLI i cannot understand the problem !!! [3] // Задача 1228. Массив 2 июн 2007 20:35

boyfox My solution for java // Задача 1228. Массив 24 окт 2009 17:31

I am david. Tabo. All done but I can't understend how it mast do? help please me. Thencks [2] // Задача 1228. Массив 3 ноя 2002 16:48

Я крыса которая съест тебя! No subject [2] // Задача 1228. Массив 16 дек 2007 03:02

Yarik What's wrong??? // Задача 1228. Массив 4 янв 2003 04:54

Dirty Is last multiplier Dn always == 1 ? [1] // Задача 1228. Массив 24 дек 2002 13:29

ss Is it: ? // Задача 1228. Массив 13 ноя 2002 13:50

I am david. Tabo. All done but I can't understend how it mast do? help please me. Thencks. ho can send me AC Program. tabo2001@posta.ge // Задача 1228. Массив 5 ноя 2002 20:10

Обсуждение задачи 1228. Массив