Решение задачи

Решение задачи - Visavi.net https://visavi.net/ RSS - Visavi.net https://visavi.net/assets/img/images/logo_small.png RSS - Visavi.net https://visavi.net/ admin@visavi.net (admin) admin@visavi.net (admin) Tue, 22 Apr 2025 09:20:11 +0300 Верхнее плюс левое.)Это перевёрнутый треугольник Паскаля. https://visavi.net/topics/27241/460410 Решение задачи Apollon76 Sun, 11 Dec 2011 13:53:13 +0400 Сообщения https://visavi.net/topics/27241/460410 16. Apollon76, интересно узнать и по какому же правилу сочтавлен массив в задаче 2? https://visavi.net/topics/27241/460402 Решение задачи ozilmahmudov Sun, 11 Dec 2011 13:48:09 +0400 Сообщения https://visavi.net/topics/27241/460402 Пожалуйста.Писал минуту. https://visavi.net/topics/27241/459466 Решение задачи Apollon76 Sat, 10 Dec 2011 13:09:22 +0400 Сообщения https://visavi.net/topics/27241/459466 var i,j:integer; a:array[0..6,0..6]of integer; begin a[1,0]:=1; for i:=1 to 6 do begin for j:=1 to 6 do begin a[j,i]:=a[j-1,i]+a[j,i-1]; end; end; for i:=1 to 6 do begin for j:=1 to 6 do write(a[j,i],' '); writeln; end; end. https://visavi.net/topics/27241/459448 Решение задачи Apollon76 Sat, 10 Dec 2011 12:43:23 +0400 Сообщения https://visavi.net/topics/27241/459448 <blockquote class="blockquote">Apollon76 (10 Декабря 2011 / 12:15) Две очень халявных задачи,которые пишутся за 5 минут.))) Если будут ещë такие задачи по 30 р.-напишу.</blockquote> Если ты такой умный покажи решение 2 задачи Добавлено через 00:32 сек. <blockquote class="blockquote">Мандарин (10 Декабря 2011 / 11:47) Два дня решал)) неустойка покрыла 30руб. <img src="https://visavi.net/uploads/stickers/D.gif" alt="D"> помог кто?</blockquote> Да помогли https://visavi.net/topics/27241/459437 Решение задачи ozilmahmudov Sat, 10 Dec 2011 12:20:52 +0400 Сообщения https://visavi.net/topics/27241/459437 Две очень халявных задачи,которые пишутся за 5 минут.))) Если будут ещë такие задачи по 30 р.-напишу. https://visavi.net/topics/27241/459432 Решение задачи Apollon76 Sat, 10 Dec 2011 12:15:22 +0400 Сообщения https://visavi.net/topics/27241/459432 Два дня решал)) неустойка покрыла 30руб. <img src="https://visavi.net/uploads/stickers/D.gif" alt="D"> помог кто? https://visavi.net/topics/27241/459416 Решение задачи Мандарин Sat, 10 Dec 2011 11:47:59 +0400 Сообщения https://visavi.net/topics/27241/459416 <blockquote class="blockquote">Мандарин (8 Декабря 2011 / 14:46) Я тебе сам дам 30 рублей если ты ее решишь.</blockquote> Давай перечисляй 30 руб. Я сделал <img src="https://visavi.net/uploads/stickers/E.gif" alt="E"> https://visavi.net/topics/27241/459413 Решение задачи ozilmahmudov Sat, 10 Dec 2011 11:45:19 +0400 Сообщения https://visavi.net/topics/27241/459413 я с потока на паскале за 100 решаю, давай больше и я сделаю) https://visavi.net/topics/27241/458828 Решение задачи Павел Fri, 09 Dec 2011 08:13:04 +0400 Сообщения https://visavi.net/topics/27241/458828 Да никто тебе её решать за 35 рублей не будет... https://visavi.net/topics/27241/458798 Решение задачи Hennessy Fri, 09 Dec 2011 05:52:10 +0400 Сообщения https://visavi.net/topics/27241/458798 Цена 35 RUB https://visavi.net/topics/27241/458549 Решение задачи ozilmahmudov Thu, 08 Dec 2011 20:09:00 +0400 Сообщения https://visavi.net/topics/27241/458549 ну что никто не знает полного решения???? https://visavi.net/topics/27241/458521 Решение задачи ozilmahmudov Thu, 08 Dec 2011 19:16:57 +0400 Сообщения https://visavi.net/topics/27241/458521 5. РУССКИЙ Дед МоРРроз, ну значит мы 2 ее непонимаем. Мне тоже кажется 6*6 https://visavi.net/topics/27241/458495 Решение задачи Дмитрий Thu, 08 Dec 2011 18:34:40 +0400 Сообщения https://visavi.net/topics/27241/458495 Там в 6*6 230 должно быть? Или я не понимаю эту задачу. https://visavi.net/topics/27241/458345 Решение задачи MiLler Thu, 08 Dec 2011 14:58:26 +0400 Сообщения https://visavi.net/topics/27241/458345 Находим наибольший элемент массива: <blockquote class="blockquote">Program dmas_9; Uses crt; const n=3;m=4; Var a:array[1..n,1..m] of integer; max,i,j:integer; Begin randomize; For i:=1 to n do begin For j:=1 to m do begin a[i,j]:=random(10); write(a[I,j]:4); end; writeln; end;</blockquote> Находим наименьший элемент массива: <blockquote class="blockquote">Program dmas_10; Uses crt; const n=3;m=4; Var a:array[1..n,1..m] of integer; min,i,j:integer; Begin randomize; For i:=1 to n do begin For j:=1 to m do begin a[i,j]:=random(10); write(a[I,j]:4); end; writeln; end;</blockquote> Ну а дальше просто найди сумму всех чисел между ними!) Удачи!) Добавлено через 03:36 сек. В общем, вот решение... <blockquote class="blockquote">procedure TForm1.Button1Click(Sender: TObject); var s:string; i,y,sum:integer; mas:array[1..6,1..6] of integer; begin //обнуляем for i:=1 to 6 do for y:=1 to 6 do mas[i,y]:=random(10)+1; for i:=1 to 6 do begin sum:=0; s:=''; for y:=1 to 6 do begin sum:=sum+mas[i,y]; //writeln(sum); s:=s+' '+inttostr(mas[i,y]); end; s:=s+' ='+inttostr(sum); memo1.Lines.add(s); end; end;</blockquote> https://visavi.net/topics/27241/458341 Решение задачи Hennessy Thu, 08 Dec 2011 14:53:21 +0400 Сообщения https://visavi.net/topics/27241/458341