#encoding: utf-8
n = input ("Сколько строк вам напечатать (n > 0) ?")
if n <= 0 :
print "До свидания!"
else:
k = 10
for i in range(n + 1):
for j in range(i):
print k,
k += 1
print
Пишите язык, на котором вам это нужно. Кто-нибудь же поиздевается и напишет на brainfuck-e.
Паскаль:
var a:integer;
begin
readln(a);
writeln(a/2)
end.
16 Мбайт=2^4*2^23 (бит)
8^x бит=2^3x (бит)
2^3x =2^27
3x=27
x=9
Program voz;
uses crt;
var a,b,c,d,e,f : integer;
begin
Write('Какая сейчас дата?(д м г)');
Read(a,b,c);
write('Введите дату вашего рождения (д м г)');
read(d,e,f);
if (b>=e) and (a>=d) then Writeln('Вам ',c-f,' лет') else writeln('Вам ',c-f-1,' лет');
end.
Первый раз заходим в условие
2-2 < 0 - нет
идем вниз
с = 4
d = 6
Второй раз идем в условие
4 - 6 < 0 - да
выходим
Ответ: с = 4