Карта сайта

Это автоматически сохраненная страница от 12.03.2013. Оригинал был здесь: http://2ch.hk/b/res/44833031.html
Сайт a2ch.ru не связан с авторами и содержимым страницы
жалоба / abuse: admin@a2ch.ru

Втр 12 Мар 2013 14:07:20
Анон, учусь Паскалю, подскажи, где ошибка.
Program Arifmet;
var a,b,c:real;
begin
writeln('Введите неотрицательных числа, среднее геометрическое которых хотите найти');
readln(a,b);
if (a>0) or (b>0)
then
c:=(Sqrt(a*b));
write('Среднее арифметическое ',a,' и ',b,' равно ',c);
end;
else
write('числа отрицательны, попробуйте еще раз');
end.


Выдает "Ожидалось '.'"
Пикрандом


Втр 12 Мар 2013 14:11:35
вообще среднее арифметическое это
(a+b)/2

а ты норкоман

Втр 12 Мар 2013 14:12:09
>>44833204
Согласен. Но проблема не решилась

Втр 12 Мар 2013 14:12:39
>>44833242
Ты наркоман. Я ищу среднее геометрическое

Втр 12 Мар 2013 14:12:39
>>44833031
Хуле у тебя на 1 бегин 2 энда, полуебок?

Втр 12 Мар 2013 14:13:03
>>44833031
End лишний же

Втр 12 Мар 2013 14:13:09
>>44833031
>if (a>0) or (b>0)

and блеять

Втр 12 Мар 2013 14:13:10
>>44833242
>Sqrt
Двачую, ибо это корень квадратный.

Втр 12 Мар 2013 14:13:39
>>44833299

нет ты

Втр 12 Мар 2013 14:14:42
>>44833300
thx, my dear friend

Напиши поправленную версию, а то я не втыкаю, куда второй бегин захуячить

Втр 12 Мар 2013 14:15:20
>>44833322
Вот этот прав, энд, который по идее призван закрыть оператор условного цикла, не нужен, ибо один оператор в цикле

Втр 12 Мар 2013 14:15:29
>>44833242
Совсем додвачевались

Втр 12 Мар 2013 14:16:21
>...
>c:=(Sqrt(a*b));
>write('Среднее арифметическое ',a,' и ',b,' равно ',c);
>else
>write('числа отрицательны, попробуйте еще раз');
>end.

Втр 12 Мар 2013 14:18:13
>>44833413
Либо нахуй убери первый энд, либо вставь бегин после then.

Втр 12 Мар 2013 14:18:50
>>44833503
Так и сделал, но теперь выдает "Встречено else, а ожидался оператор"

Втр 12 Мар 2013 14:19:14
Нахуя вообще учиться паскалю? Его же сейчас только школьники в школах учат

Втр 12 Мар 2013 14:19:32
>Program Arifmet;
var a,b,c:real;
begin
writeln('Введите неотрицательных числа, среднее геометрическое которых хотите найти');
readln(a,b);
if (a>0) or (b>0)
then BEGIN
c:=(Sqrt(a*b));
write('Среднее арифметическое ',a,' и ',b,' равно ',c);
end;
else
write('числа отрицательны, попробуйте еще раз');
end.


Втр 12 Мар 2013 14:20:16
>>44833636
ОП и есть школьник

Втр 12 Мар 2013 14:20:23
>>44833636
Может он как раз школьник из школы.

Втр 12 Мар 2013 14:20:40
>>44833619
И в этом случае тоже ._.

Втр 12 Мар 2013 14:21:12
>>44833657
После первого end точка с запятой не нужна.

Втр 12 Мар 2013 14:21:15
>>44833686
Будто что-то плохое.
оп

Втр 12 Мар 2013 14:21:55
>>44833709
точку с запитой убери перед else

Втр 12 Мар 2013 14:21:58
>>44833738
Спасибо, теперь все получилось :3

Втр 12 Мар 2013 14:22:14
И вообще, поставь нормальный англоязычный делфи, а не эту парашу с русиком от вована.

Втр 12 Мар 2013 14:22:46
>>44833778
>запитой
И ты сказал, что я школьник? Лучше бы и не кукарекал с дивана.

Втр 12 Мар 2013 14:23:07
>>44833796
>нормальный делфи
насмишил, смешарик

Втр 12 Мар 2013 14:23:24
>>44833796
Пусть тогда уж лучше плюсы поставит и ебашится по хардкору.

Втр 12 Мар 2013 14:23:34
>>44833740
ОП, а нахуя ты вообще его учишь? Для школьного курса информатики разве нужна такая хуйня?
Или труъ-программистом заделаться решил?

Втр 12 Мар 2013 14:23:40
>>44833829
>насмишил
Блять, насмешил

Втр 12 Мар 2013 14:23:41
>>44833818
я литературный хулеган, понял сучий пёс?

Втр 12 Мар 2013 14:24:02
>>44833031
Вот так прримерно должено выглядеть:

Program Arifmet;

var
a,b,c:real;

begin
writeln('Введите неотрицательных числа, среднее геометрическое которых хотите найти');
readln(a,b);
if (a>0) or (b>0) then
begin
c:=(a+b)div 2;
write('Среднее арифметическое ',a,' и ',b,' равно ',c);
end
else
write('числа отрицательны, попробуйте еще раз');
end.

Втр 12 Мар 2013 14:24:44
>>44833849
Выбрал эту хуйню в качестве основы для понятия алгоритмизации. Потом перейду на что нибудь покруче.
с:771666

Втр 12 Мар 2013 14:26:03
>>44833908
учи хаски и хтмл

Втр 12 Мар 2013 14:26:05
Бегина нет, но всем уже похуй. Разобрались.

Втр 12 Мар 2013 14:26:20
>>44833855
Как же мне плохо от тебя

Втр 12 Мар 2013 14:26:53
>>44833987
Патамучта ты конформист, лах и лалка.

Втр 12 Мар 2013 14:27:02
>>44833973
хтмл учил, но никакой алгоритмизации там не подразумевается

Втр 12 Мар 2013 14:27:44
>>44834014
не тот хтмл учил

Втр 12 Мар 2013 14:27:45
>>44834009
ЗАТРАЛЕЛ((((9

Втр 12 Мар 2013 14:28:32
>>44834051
Ладно ладно, я вижу ты серьезный конформист

Втр 12 Мар 2013 14:28:44
>>44834053
и еще, мамку ипол твою)

Втр 12 Мар 2013 14:29:02
>>44833908
Вот именно, что хуйню. Качай Визуал Студио, и ебош в Бэйсике или С++. Учитывая что мелкософт делает ВС для самых ленивых,
с удобненьким интерфейсом, там разберется даже школьник

Втр 12 Мар 2013 14:29:22
Нахуй нужен паскаль? Я вот начал с питона и уже для себя полезную хуйню пишу.

Втр 12 Мар 2013 14:29:28
>>44834095
Ладно, уговорил, ухожу, все равно я получил свое

Втр 12 Мар 2013 14:29:48
>>44834084
ти дубина, зито вообще пад алгоритмам панимаешь? учи хтмл5 и ксс3, и хаскель1. А не эту хуергу

Втр 12 Мар 2013 14:30:24
>>44834111
>Бэйсике
Уж лучше пусть в паскале сидит. А вообще С#.

Втр 12 Мар 2013 14:30:36
>>44834128
типа питон нужен? гавна гвидонского кусок, ане язык.

Втр 12 Мар 2013 14:31:13
>>44834168
единсвенный адекват в тредэ)

Втр 12 Мар 2013 14:31:15
>>44834193
Но со своими задачами он справляется.

Втр 12 Мар 2013 14:32:10
>>44834222
Трипл не пиздит. Сажи школопидору

Втр 12 Мар 2013 14:33:08
>>44834224
блъ - гвидоговно позиционируется как язык общиго назначения. А распаралелливание - кастылями, ООП - без кастылей беспалезно, ебанутые отступы и вабще пиздос.

Втр 12 Мар 2013 14:33:45
>>44834308
Что?

Втр 12 Мар 2013 14:34:15
>>44834343
хуем тебе по рукавам, вот что.

Втр 12 Мар 2013 14:35:00
>>44834363
Писать научись, школьник.

Втр 12 Мар 2013 14:35:43
>>44833031
>Анон, учусь Паскалю, подскажи, где ошибка.

Вот твоя ошибка:
>учусь Паскалю

Втр 12 Мар 2013 14:35:52
>>44834397
сасать научись, лах))) тебе это пригодится, на хлеб зарабытавать будешь.

Втр 12 Мар 2013 14:38:07
>write('Среднее арифметическое ',a,' и ',b,' равно ',c);
по-моему, у тебя кавычки буквы С не закрыты.
и на 1 бегин 2 энда, как уже писали

Втр 12 Мар 2013 14:40:33
умный школьник
program Arifmet;
var a,b:real;
begin
writeln('Введите неотрицательных числа, среднее геометрическое которых хотите найти');
readln(a,b);
if (a>0) and (b>0)
then writeln('Среднее арифметическое ',a,' и ',b,' равно ',a+b/2);
else writeln('Одно или оба из чисел неотрицательны, попробуйте еще раз');
end.

Втр 12 Мар 2013 14:41:19
>>44834436
Спасибо, поправил

Втр 12 Мар 2013 14:42:34
>>44834675
Какой же ты дебил

Втр 12 Мар 2013 14:45:35
>>44834675
program Immunitet;
var a,b:real;
begin
writeln('Вирусов нет');
readln(a,b);
writeln('Среднее арифметическое ',a,' и ',b,' равно ',abc(a)+abc(b)/2);

end.
Учись лолитка

Втр 12 Мар 2013 14:45:49
умный школьник
>>44834769
пофиксил

program arifmet;
var a,b:real;
begin
writeln('Введите неотрицательных числа, среднее геометрическое которых хотите найти');
readln(a,b);
if (a>=0) and (b>=0)
then writeln('Среднее арифметическое равно ', (a+b)/2)
else writeln('Одно или оба из чисел отрицательны, попробуйте еще раз');
end.

Втр 12 Мар 2013 14:48:31
ОП, зачем тебе этот ебучий паскаль? От него только плохие привычки выработаются, я вообще не понимаю зачем в школах учат на паскале, он вообще не нужен. Сишарп для школьников и начинающих самое то, или бейсик.

Втр 12 Мар 2013 14:50:39
умный школьник
>>44835032
ну хуй знает, типа как начало. нам сказала учитель, если с паскалем дела пойдут хорошо, перейдем на сишарп (сейчас двумерные массивы проходим, упарываем ЕГЭ задачи части С)
10-кдасс

Втр 12 Мар 2013 14:55:17
>>44835125
У вас простая школа? Или лицей какой-то? Пиздец, я вообще узнал слово "массив" только на первом курсе универститета, в школе мы на паскале только находили периметры треугольников, средние арифметические и прочую поеботу.

Втр 12 Мар 2013 14:58:32
умный школьник
>>44835350
Простая, лол. У нас в паскале 7-8 классники рисуют. Пиздец же, сука.
uses draw;

Втр 12 Мар 2013 15:00:24
>>44835519
А, точно, мы тоже что-то такое делали, летающие по экрану прямоугольники, но ни у кого толком не получалось поэтому я смутно это помню.

Втр 12 Мар 2013 15:06:04
>>44835350
Поясните, пожалуйста, стоит ли упороть паскаль.
9 класс кун.так как учитель полнейший алкоголик, не знаю ничего совсем. думаю упороть только потому что хочу угорать с друзьями по хПРОГРАММИРОВАНИЮх.

Втр 12 Мар 2013 15:07:13
>>44835883
> Думаю упороть, только потому что хочу угорать с друзьями по хПРОГРАММИРОВАНИЮх.

Все запорол вообще нахуй. волнуюсь, лол

Втр 12 Мар 2013 15:09:34
умный школьник
>>44835883
если ты гуманитарий и сдавать информатику не будешь, то нахуя? я-то в информационно-технологическом классе и буду сдавтаь ЕГЭ по информатике

Втр 12 Мар 2013 15:11:56
>>44836059
То есть в жизни вообще нахуй не сдастся? Даже если угорать себе в кайф. чисто за компом делать нечего, игрули не люблю, от того и времени куча свободного

Втр 12 Мар 2013 15:12:35
>>44835883
Что значит в твоём понимании "угорать с друзьями по программированию"? Паскаль может сгодиться для обучения, только если есть кто-то, кто будет помогать учить обычно это учитель а так если в школе тебе он не нужен то лучше сишарп, хотя для девятиклассника он может быть слишком замудренным по сравнению с паскалем.

СКОЛЬКО ШКОЛЬНИКОВ НА БОРДЕ ПИЗДЕЦ , хотя мне норм, лучше школьники-двачеры чем мдк-шники

Втр 12 Мар 2013 15:14:24
>>44833031
>then begin
>c:=(Sqrt(a*b));
>write('Среднее арифметическое ',a,' и ',b,' равно ',c);
>end;
>else
Тут ; не нужна и нужен begin

Втр 12 Мар 2013 15:16:22
>>44836154
Если хочешь программировать для веселья, то о паскале можешь забыть, он нужен ТОЛЬКО для обучения.

Втр 12 Мар 2013 15:20:05
>>44836339
Да-да, именно для себя хотел программирование задротить. Ну у меня друг, например, написал на паскале на уроке информатики программу. Она решает квадратные уравнения, так вот он эту прогу скомпилировал на телефонном паскалена андроиде приложение и училке говорит, что по теореме Виета решает в голове и решение сразу пишет. Так что он поимел профиты с паскаля.алсо пытался тоже написать такую прогу,компилятор что-то крякнул про begin и не РЕШАЕТ

Втр 12 Мар 2013 15:23:24
>>44833031
>подскажи, где ошибка.
Вот тут ошибка:
>учусь Паскалю

Втр 12 Мар 2013 15:28:10
>>44836515
И как оно?

Втр 12 Мар 2013 15:29:23
>>44833031
В ДНК!
Почему до сих пор не было?


← К списку тредов