ПОМОГИТЕ ПЛЗ :) Turbo Pascal ;)

[Detka]

программа должна вычислять среднее значение положительных чисел среди вводимых произвольных...в тексте программы я описАлась,в том месте,где "а" надо прибавлять,у меня и написано "а",а тут написала 1( сейчас попробую с твоей помощью проверить ее

[Detka]

ггг,работает ))

[Troll]

Использование оператора goto считается очень плохим тоном, в связи с этим, блок:

begin
vvod: writeln ('skolko budet 4isel?');
readln(n);
if N<1 then
writeln ('nelzya rassmatrivat menwe odnogo 4isla');
goto vvod;
end;

помойму лучше заменить на

repeat
writeln ('skolko budet 4isel?');
readln(n);
if N<1 then writeln ('nelzya rassmatrivat menwe odnogo 4isla');
until N>=1

Так же вызывает некоторое сомнение следующий блок:

if a>0 then
k:=k+1;
s:=s+a;
end;

Если после оператора if следует обрабатывать блок кода, то его надо заключать в begin end; в противном случае выполняется только единственная следующая за оператором команда. Т.е k:=k+1 выполняется в случае, если a>0, а s:=s+a - в любом

for i:=1 to N do begin
writeln ('vvedite o4erednoe 4islo');
readln(a);
if a>0 then
 begin
   k:=k+1;
   s:=s+1;
 end;
end;

Так помойму будет лучше

[Pitty]

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

Использование оператора goto считается очень плохим тоном, в связи с этим, блок:

Так помойму будет лучше

Тroll, тебе бы курсы по ТП открывать, да и по С# наверное сможешь: 720 рэ с каждого слушателя в месяц - имхо больше, чем за сам кодинг получается, если 2-3 группы по 15 слушателей. В)

[Troll]

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

Тroll, тебе бы курсы по ТП открывать, да и по С# наверное сможешь: 720 рэ с каждого слушателя в месяц - имхо больше, чем за сам кодинг получается, если 2-3 группы по 15 слушателей. В)

Тут проблеммка исть! Я как собака - понимаю, знаю - объяснить не могу Если напечать, то ещё бе-ме, а вот на словах - совсем швах. Да и по некоторым языкам (в частности C#) есть в Удомле, более знающие люди.

[Pitty]

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

Тут проблеммка исть! Я как собака - понимаю, знаю - объяснить не могу Если напечать, то ещё бе-ме, а вот на словах - совсем швах. Да и по некоторым языкам (в частности C#) есть в Удомле, более знающие люди.

А тут на форуме ты неплохо объясняешь. В программировании имхо хороший пример с комментариями - лучше чем 20 страниц объяснения.
К последнему предложению: ткните пальцем по ветру, чтобы знатЬ, у кого спрашивать.

[Troll]

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

К последнему предложению: ткните пальцем по ветру, чтобы знатЬ, у кого спрашивать.

Не могу. Вдруг данные люди не хотят повышенного внимания к себе. Но для того, что бы спрашивать существует форум.

[VSD]

всем по привету ))) вообщем сразу к делу. у меня поверхностные знания в хтмл. задача максимум: научиться писать скрипты работающие на пхп+мускул. задача минимум уверено латать и корректировать работу уже написанных скриптов. из пхп знаю только что это язык вэб програмирования. не могли бы вы научить меня ему (хотя бы на любительском уровне) . связь через скайп x_vsd_x . и вообще, в удомле есть подобные курсы на которые можно записаться?

сорри если оффтопнул.

[Messiah]

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

всем по привету ))) вообщем сразу к делу. у меня поверхностные знания в хтмл. задача максимум: научиться писать скрипты работающие на пхп+мускул. задача минимум уверено латать и корректировать работу уже написанных скриптов. из пхп знаю только что это язык вэб програмирования....

Теперь бы ещё понять при чём здесь Turbo Pascal? ...обозначенный в заголовке...

[smith'']

www.codenet.ru - может пригодиться кому, много статей полезных и не очень