училка, так подобрала задания

15.06.2011

Один я чувствую подвох?

http://www.freepascal.org/docs-html/rtl/sysutils/datetimeroutines.html
Иди читай

Как это относится к линуксу? Надеюсь ты не решил стать программистом?

> Иди читай

Да и без этого три минуты как бы.

Так Ubuntu же пользуюсь, с Geany и fpc.

> Надеюсь ты не решил стать программистом?

А что ж плохого? А то лулзы в девелопмент редкость, а ужу, похоже, завязал с этим.

Не шаришь ты, анон. Так может хоть научим/приучим ТС читать и не только СМС-ки, а ещё и хэндбуки.

Ну что ж, валяй, выкладывай свои наброски.

> Так может хоть научим/приучим ТС читать и не только СМС-ки, а ещё и хэндбуки.

Это, канеш, хорошо. Но для простых задач нужны простые решения. Еще привыкнет к разным хеллоуворлдам по двадцать библиотек тащить.

училка, так подобрала задания
15.06.2011

Один я чувствую подвох?

Никакого подвоха там нету, я учусь в этом лицее и вот наше расписание практики по информатике?

>выкладывай свои наброски.

Он и так уже «набросил», осталось подождать пока «выложит» или «наложит».

Настораживает знак вопроса в конце.

Надеюсь ты не решил стать программистом?

Не не не, я хочу стать водителем автобуса, как filosof

>главное училка, так подобрала задания, что в том варианте где 1-ое задание лёгкое, 2-ое трудное и наоборот.

Посоны, не ходите по ссылке, там капча!!!!

годный вброс =) давно такого не читал...

> Не не не, я хочу стать водителем автобуса, как filosof

А там без паскаля не принимают?

Все есть в libatsral.so

Чувак, а как по номеру месяца угадать год, к которому этот номер относится?

Переспросить пользователя же

Там паскаль вообще не нужен, просто я хочу 5 по информатике в году.

> Там паскаль вообще не нужен, просто я хочу 5 по информатике в году.

Походу в таком случае только через постель.

...И после ввода номера года, еще попросить пользователя ввести кол-во дней в месяце, а потом WRITELN-ом 'вычислить' :)

Ой, блин, очепятался...

Вы действительно хотите видеть этот бред?

Да.

Ладно, я вас предупредил:

program md;

uses crt;
var N,x,y,i : integer;

BEGIN
writeln('Введите номер месяца');
readln(N);
x:=0;
y:=0;
for i:= 1 to 12 do
if 
x: = x+i+1 then
writeln('30 дней');
else
y: = y+i+2;
writeln('31 день');
else	
N=2
writeln ('28 или 29 дней');	
END.

хватит ребенка травить

 
scanf("%d", &month);
if (month < 0 || month > 12)
    printf ("not a month\n");
else
    switch (month) {
    case 2:
        printf ("28(29)\n");
        break;
    case 4:
    case 6:
    case 9:
    case 11:
        printf ("30\n");
        break;
    default:
        printf ("31\n");
    }

натравишь на код p2c и будет тебе счастье

про p2c прогнал, а обратного конвертера не знаю. так что учи си

Только через постель.

Хватит тешить человека надеждой

На удивление, c2p выдал такое:

{$apptype console}
var d: integer;
begin
	write('Введите номер месяца: ');
	readln(d);
	if not (d in [1 .. 12])
	then writeln('Не вводи чуш, пидорас!')
	else
	case d of
	  2: writeln('Это февраль, детка, он может быть и високосным');
	  4,6,9,11: writeln('Кол-во дней - 30');
	  else writeln('Кол-во дней - 31')
	end
end.

ПОЧЕМУ ШКОЛЬНИКИ С ТАКИМ РВЕНИЕМ ИГНОРИРУЮТ ОТСТУПЫ?

Cпасибо, я подобное хотел запилить, используя case, но оказался в пролёте, ибо не знал некоторых нюансов, из-за того, что писал на лекции как курица лапой и отвлекался на Разака играющего в GTA4.

банальная лень и отсутствие чувства прекрасного, как следствие плохо читаемый «лазанья-код»

Может мой мозг безнадёжно испорчен питоном, но без отступов программа на языке высокого уровня мной не воспринимается.

ИМХО, для подрастающих прогеров обязательно посещение ЛКШ.

var m: integer;
begin
readln(m);
if m <> 1 then m := 1;
if m = 2 then {учтем и февраль} then m := 1;
if m = 1 then {это январь}
writeln ('в январе 31 день');
end.

> Один я чувствую подвох?

третья пересдача

это хорошо, а то вот у меня бывают тоже «поленья» в коде и потом их очень трудно «перепиливать»

ЛКШ - это что?

http://c2pas.sourceforge.net/ :3

Летняя компьютерная школа

Это крутая летняя комп. школа. Знакомый школьник в восторге от неё. За одну смену научили отступам, отучилиь быдлокодить и дали отличную базу. И это самая младшая по сложности группа.

никогда не слышал про это) по всей видимости полезная вешь

далеко не факт. осознание отступов пришло лично ко мне далеко не сразу только после осознания структурности всего этого безобразия. И даже когда осознаешь пока не выработается стиль, будешь бросать {} begin,end then else в разных местах по разному..
хотя у меня проблемы могли быть от того, что я пару лет в начале на бейсике прогал, который

10 CLS
20 PRINT "HI"
30 INPUT A$
40 GOTO 10

Из последний группы прогеры побеждают на меж. нарах. :) Ну это где-то 11 класс, ЕМНИП.

постить надо подобное:

const
	m: string = '202121221212';
	s: array [0 .. 2] of string = ('28/29', '30', '31');
var
	d: integer;
begin
	write('Введи номер: ');
	readln(d);
	if not (d in [1 .. 12])
	then writeln('Ааааа!')
	else writeln(s[ord(m[d])-ord('0')])
end.

я начинал с FoxPro, поэтому я тот-ещё извращенец))

язабан

[опять] предлагаю забанить пока не выучит Паскаль. Скажите, подобное потом из Development удаляют? Если нет, то даже не представляю, куда скатится ЛОР =(

Ну не всё же сраться о ненужности лиспа.

как я понял, только школьники туда берутся, или не?

> Ну что ж, валяй, выкладывай свои наброски.

Набрасывать ТС еще только учится...