Hip-Hop.Ru
Страница 46 из 136: « Первая ← 2636394041424344454647484950515253566696 → Последняя »
Показывать 50 сообщений этой темы на одной странице

Hip-Hop.Ru (https://www.hip-hop.ru/forum/)
-   Компьютеры и Интернет (https://www.hip-hop.ru/forum/kompyutery-i-internet-f186)
-   -   Программисты / Компьютерные техники, которые НИКОГДА не спят! [Беседка] (https://www.hip-hop.ru/forum/programmisty-kompyuternye-tehniki-kotorye-nikogda-ne-spyat-besedka-252443/)

Трэй 11 марта 2011 21:21
бля пацаны выручайте
написал программу вроде, а она не хочет работать
я хз уже что с ней делать

дан одномерный массив.удалить из него все отрицательные элементы со сдвигом элементов.в конце, если остаются пустые элементы, придать им значение 0

Показать скрытый текст
Код:
const k=10;
var a:array[1..k] of integer;
    i,n,s,o:integer;
begin
    s:=0;
    for i:=1 to k do
    begin
          readln(a[i]);
    end;
    for i:=1 to k do
    begin
          if a[i]<0 then
          begin
              for o:=1 to k-1 do
              a[o]:=a[o+1];
              s:=s+1;
          end;
    end;
    for i:=(k-s) to k do
    begin
          a[i]:=0;
    end;
    for i:=1 to k do
    begin
          writeln(a[i]);
    end;
    readln;
end.

Hammer 11 марта 2011 21:35
Будь внимательней.
Код:
const k=5;
var a:array[1..k] of integer;
i,n,s,o:integer;
begin
s:=0;
for i:=1 to k do
begin
readln(a[i]);
end;
for i:=1 to k do
begin
if a[i]<0 then
begin
for o:=i to k-1 do a[o]:=a[o+1];
s:=s+1;
end
else o:=o+1;
end;
for i:=(k + 1 - s) to k do
begin
a[i]:=0;
end;
writeln('Вывод:');
for i:=1 to k do
begin
writeln(a[i]);
end;
readln;
end.
P.S. Много лишнего кода. Почитай что-нибудь об эффективном кодинге на паскале.
Например, лишние begin и end;
Да и оформление кода оставляет желать лучшего. ;)

Трэй 11 марта 2011 21:40
Вложений: 1
Цитата:
Цитата от Hammer (Сообщение 1072664437)
Будь внимательней.
Код:
const k=5;
var a:array[1..k] of integer;
i,n,s,o:integer;
begin
s:=0;
for i:=1 to k do
begin
readln(a[i]);
end;
for i:=1 to k do
begin
if a[i]<0 then
begin
for o:=i to k-1 do a[o]:=a[o+1];
s:=s+1;
end
else o:=o+1;
end;
for i:=(k + 1 - s) to k do
begin
a[i]:=0;
end;
writeln('Вывод:');
for i:=1 to k do
begin
writeln(a[i]);
end;
readln;
end.
P.S. Много лишнего кода. Почитай что-нибудь об эффективном кодинге на паскале.
Например, лишние begin и end;
Да и оформление кода оставляет желать лучшего. ;)
:(
нас просто учили, что если for ... do то надо begin\end ставить
спасибо, учту

Hammer 11 марта 2011 22:02
Цитата:
Цитата от Трэй (Сообщение 1072664511)
:(
нас просто учили, что если for ... do то надо begin\end ставить
спасибо, учту
Код:
const k=10;
var a:array[1..k+1] of integer;
i,o:integer;
begin
for i:=1 to k do
begin
readln(a[i]);
end;
for i:=1 to k do
begin
if a[i]<0 then
begin
for o:=i to k do a[o]:=a[o+1];
end;
end;
writeln('Вывод:');
for i:=1 to k do
begin
if a[i] < 0 then a[i]:= 0;
writeln(a[i]);
end;
readln;
end.

Трэй 11 марта 2011 22:11
Цитата:
Цитата от Hammer (Сообщение 1072664805)
Цитата:
Цитата от Трэй (Сообщение 1072664511)
:(
нас просто учили, что если for ... do то надо begin\end ставить
спасибо, учту
Код:
const k=10;
var a:array[1..k+1] of integer;
i,o:integer;
begin
for i:=1 to k do
begin
readln(a[i]);
end;
for i:=1 to k do
begin
if a[i]<0 then
begin
for o:=i to k do a[o]:=a[o+1];
end;
end;
writeln('Вывод:');
for i:=1 to k do
begin
if a[i] < 0 then a[i]:= 0;
writeln(a[i]);
end;
readln;
end.
у меня без
for i:=1 to k do
begin
if a[i] < 0 then a[i]:= 0;
заработало

спасибо огромное :horosho:

зулусик просто 13 марта 2011 03:29
Цитата:
Цитата от Тедди (Сообщение 1072655339)
Цитата:
Цитата от зулусик просто (Сообщение 1072654913)
Цитата:
Цитата от Тедди (Сообщение 1072649851)


Да, это приведение к ступенчатому виду.Форум уничтожает отступы. Программа должна считать ранг матрицы.
Вот весь проект в архиве
http://file.qip.ru/file/tZB2Uiuj/Хрень.html ( 207,25 Кб )

У меня массив динамический
ну как бы i и j местами поменять в 1ой выделенной строке надо в любом случае;)
а если у тебя массив динамический, надо наверно память под него выделить, не?:krik:
короче так
setlength(arr,strok,stolb);
:king:
Окей. Про память был не в курсе. завтра попробую. спасибо

Добавлено через 17 часов 11 секунд
щас не могу посмотреть, делфа дико глючит.
это алгоритм уже, я думаю.
ну посмотри, там что-то скорее всего с индексами. из-за этого вылетает скорее всего.

Тедди 13 марта 2011 10:49
Цитата:
Цитата от зулусик просто (Сообщение 1072676936)
Цитата:
Цитата от Тедди (Сообщение 1072655339)
Цитата:
Цитата от зулусик просто (Сообщение 1072654913)

ну как бы i и j местами поменять в 1ой выделенной строке надо в любом случае;)
а если у тебя массив динамический, надо наверно память под него выделить, не?:krik:
короче так
setlength(arr,strok,stolb);
:king:
Окей. Про память был не в курсе. завтра попробую. спасибо

Добавлено через 17 часов 11 секунд
щас не могу посмотреть, делфа дико глючит.
это алгоритм уже, я думаю.
ну посмотри, там что-то скорее всего с индексами. из-за этого вылетает скорее всего.
Да вроде всё проверил.

Hammer 13 марта 2011 12:34
Цитата:
Цитата от Тедди (Сообщение 1072678445)
Цитата:
Цитата от зулусик просто (Сообщение 1072676936)
Цитата:
Цитата от Тедди (Сообщение 1072655339)

Окей. Про память был не в курсе. завтра попробую. спасибо

Добавлено через 17 часов 11 секунд
щас не могу посмотреть, делфа дико глючит.
это алгоритм уже, я думаю.
ну посмотри, там что-то скорее всего с индексами. из-за этого вылетает скорее всего.
Да вроде всё проверил.
Ну там ошибка в делении как я понял. «/»
Может на ноль делишь и вообще, покажи объявление массива.

Тедди 13 марта 2011 13:12
Цитата:
Цитата от Hammer (Сообщение 1072679673)
Цитата:
Цитата от Тедди (Сообщение 1072678445)
Цитата:
Цитата от зулусик просто (Сообщение 1072676936)

щас не могу посмотреть, делфа дико глючит.
это алгоритм уже, я думаю.
ну посмотри, там что-то скорее всего с индексами. из-за этого вылетает скорее всего.
Да вроде всё проверил.
Ну там ошибка в делении как я понял. «/»
Может на ноль делишь и вообще, покажи объявление массива.
нет, я не делю на ноль, но эту ситуацию я действительно не предусматривал. Я же скинул проект

Delpix 16 марта 2011 17:31
Задача по С++
 
Помогите

Найти все трехзначные натуральные числа,остаток от деления которых на 11 равен сумме цифр этого числа.
Нужен код программы

Hammer 16 марта 2011 17:41
Цитата:
Цитата от Delpix MC (Сообщение 1072717578)
Помогите

Найти все трехзначные натуральные числа,остаток от деления которых на 11 равен сумме цифр этого числа.
Нужен код программы
Задача по жизни.

Помогите.

Найти все трехзначные купюры.
Нужны деньги.

P.S. Здесь не каталог готовых программ. Свои попытки есть?

disa zakon 16 марта 2011 17:48
Цитата:
Цитата от Hammer (Сообщение 1072717712)
Цитата:
Цитата от Delpix MC (Сообщение 1072717578)
Помогите

Найти все трехзначные натуральные числа,остаток от деления которых на 11 равен сумме цифр этого числа.
Нужен код программы
Задача по жизни.

Помогите.

Найти все трехзначные купюры.
Нужны деньги.

P.S. Здесь не каталог готовых программ. Свои попытки есть?
:guinda::guinda::guinda:
чотка

Delpix 16 марта 2011 17:49
#include <iostream>
#include <math.h>
using namespace std;
void main ()
{
int k;
for (int i=100;<=999;i++)
if ((i)==(i\100+(i\10)+i\10))
k++;
cout;
}
Вот чет похожее но не работает

bombom 16 марта 2011 21:15
кто в паскале шарит, можете объяснить чем отличаются операторы for, while?

Турбо Гаечка 16 марта 2011 21:29
Цитата:
Цитата от Delpix MC (Сообщение 1072717783)
#include <iostream>
#include <math.h>
using namespace std;
void main ()
{
int k;
for (int i=100;<=999;i++)
if ((i)==(i\100+(i\10)+i\10))
k++;
cout;
}
Вот чет похожее но не работает
так навскидку, мож неправильно...
Код:
int k,j=0;
for (int i=100;i<1000;i++)
{
k=i%11;
if (k==(i\100+(i\10)+i\10))
j++;
cout<<j;
}

Безмятежность 16 марта 2011 22:23
Цитата:
Цитата от ExIzze (Сообщение 1072720395)
кто в паскале шарит, можете объяснить чем отличаются операторы for, while?
грубо говоря
while - цикл работает, пока не выполнится некое условие
for - цикл идёт определённое количество раз, каждый раз увеличивая счётчик на 1

bombom 16 марта 2011 22:41
Цитата:
Цитата от Женя Йети (Сообщение 1072721090)
Цитата:
Цитата от ExIzze (Сообщение 1072720395)
кто в паскале шарит, можете объяснить чем отличаются операторы for, while?
грубо говоря
while - цикл работает, пока не выполнится некое условие
for - цикл идёт определённое количество раз, каждый раз увеличивая счётчик на 1
спасибо.

SaVior 16 марта 2011 22:42
Блин, какой-то мудлан снёс мою тему. :tomato:
Мне нужно сайт на html забацать. Я в этой хуйне не шарю, поэтому предлагаю деньги тому кто просто оформит мне дизайн страници. Я не ожидаю ничего ахуенного, просто простой сайт, с навигацией в javascript или css и сочитающимся дизайном.
Думаю для знающих людей дело не больше чем на час. Работу оплачу, если кому не в падлу, стучитесь в личку.

Delpix 16 марта 2011 23:40
Цитата:
Цитата от Sa[V]ior (Сообщение 1072721301)
Блин, какой-то мудлан снёс мою тему. :tomato:
Мне нужно сайт на html забацать. Я в этой хуйне не шарю, поэтому предлагаю деньги тому кто просто оформит мне дизайн страници. Я не ожидаю ничего ахуенного, просто простой сайт, с навигацией в javascript или css и сочитающимся дизайном.
Думаю для знающих людей дело не больше чем на час. Работу оплачу, если кому не в падлу, стучитесь в личку.
Могу на ucoz сделать

SaVior 17 марта 2011 08:09
Цитата:
Цитата от Delpix MC (Сообщение 1072721864)
Цитата:
Цитата от Sa[V]ior (Сообщение 1072721301)
Блин, какой-то мудлан снёс мою тему. :tomato:
Мне нужно сайт на html забацать. Я в этой хуйне не шарю, поэтому предлагаю деньги тому кто просто оформит мне дизайн страници. Я не ожидаю ничего ахуенного, просто простой сайт, с навигацией в javascript или css и сочитающимся дизайном.
Думаю для знающих людей дело не больше чем на час. Работу оплачу, если кому не в падлу, стучитесь в личку.
Могу на ucoz сделать
мне сайт не нужен онлайн, мне просто сама оболочка нужна.
То есть делаешь сайт, пересылаешь его мне и всё.

иксуй! 17 марта 2011 08:14
Цитата:
Цитата от Delpix MC (Сообщение 1072721864)
Цитата:
Цитата от Sa[V]ior (Сообщение 1072721301)
Блин, какой-то мудлан снёс мою тему. :tomato:
Мне нужно сайт на html забацать. Я в этой хуйне не шарю, поэтому предлагаю деньги тому кто просто оформит мне дизайн страници. Я не ожидаю ничего ахуенного, просто простой сайт, с навигацией в javascript или css и сочитающимся дизайном.
Думаю для знающих людей дело не больше чем на час. Работу оплачу, если кому не в падлу, стучитесь в личку.
Могу на ucoz сделать
:facepalm:

Nugget 17 марта 2011 10:02
:morj:

Delpix 17 марта 2011 17:07
Задание:
Найти все трехзначные натуральные числа,остаток от деления которых на 11 равен сумме цифр этого числа.
Код:

#include <iostream>
#include <math.h>
using namespace std;
void main ()
{
int k;
for (int i=100;<=999;i++)
if ((i)==(i\100+(i%10)+(i\10%10))); - в этой строчке Visual бесперебойно выдает - синтаксическая ошибка: )
{
k++;
cout<<k<<" ";
}
cout<<"\n"<<k;
}


if ((i)==(i\100+(i%10)+(i\10%10))); - в этой строчке Visual бесперебойно выдает - синтаксическая ошибка: )
В чем причина

Delpix 17 марта 2011 17:17
Цитата:
Цитата от иксуй! (Сообщение 1072723445)
Цитата:
Цитата от Delpix MC (Сообщение 1072721864)
Цитата:
Цитата от Sa[V]ior (Сообщение 1072721301)
Блин, какой-то мудлан снёс мою тему. :tomato:
Мне нужно сайт на html забацать. Я в этой хуйне не шарю, поэтому предлагаю деньги тому кто просто оформит мне дизайн страници. Я не ожидаю ничего ахуенного, просто простой сайт, с навигацией в javascript или css и сочитающимся дизайном.
Думаю для знающих людей дело не больше чем на час. Работу оплачу, если кому не в падлу, стучитесь в личку.
Могу на ucoz сделать
:facepalm:
:confused:

иксуй! 17 марта 2011 21:53
Цитата:
Цитата от Delpix MC (Сообщение 1072727558)
Задание:
Найти все трехзначные натуральные числа,остаток от деления которых на 11 равен сумме цифр этого числа.
Код:

#include <iostream>
#include <math.h>
using namespace std;
void main ()
{
int k;
for (int i=100;<=999;i++)
if ((i)==(i\100+(i%10)+(i\10%10))); - в этой строчке Visual бесперебойно выдает - синтаксическая ошибка: )
{
k++;
cout<<k<<" ";
}
cout<<"\n"<<k;
}



if ((i)==(i\100+(i%10)+(i\10%10))); - в этой строчке Visual бесперебойно выдает - синтаксическая ошибка: )
В чем причина
Ты в курсе что знак деления в другую сторону наклонён?:D
и что за if адский такой вообще... зачем точка с запятой после него сразу?


Часовой пояс GMT +3, время: 00:30.
Страница 46 из 136: « Первая ← 2636394041424344454647484950515253566696 → Последняя »
Показывать 50 сообщений этой темы на одной странице

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions Inc.

vBulletin Optimisation provided by vB Optimise (Pro) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.