Написать программу, от пользователя число (номер года) и выводящую информацию о том, високосный этот год или нет

175

183

Посмотреть ответы 2

Ответы на вопрос:

nmpepatop1

Информатика

4,5(85 оценок)

Вгригорианском календаре високосным является: - год, номер которого делится нацело на 400 - год, номер которого делится на 4, но не делится на 100 программа на паскале: var n: integer; begin read(n); if (n mod 400 = 0) or (n mod 4 = 0) and (n mod 100 > 0) then writeln(n, ' год високосный') else writeln(n, ' год невисокосный'); end.

кошечка545

Информатика

4,4(16 оценок)

Uses system.collections.generic; var a: array of string; b: list< integer> : = new list< integer> (); f, g: string; begin readln(f, g); system.io.file.writealltext(f, ''); system.io.file.writealltext(g, ''); for k: byte : = 1 to 10 do system.io.file.appendalltext(f, inttostr(random(25)) + system.environment.newline); a : = system.io.file.readalllines(f); foreach k: string in a do b.add(strtoint(k)); var i: integer; while (i < b.count - 1) do begin while (b.indexof(b[i]) < > b.lastindexof(b[i])) do b.removeat(b.lastindexof(b[i])); inc(i); end; foreach k: integer in b do system.io.file.appendalltext(g, inttostr(k) + system.environment.newline); end.