For i in range(1, 100):
if i*i % 13 == 0:
print i
Все правильно, получается квадрат. Попробуй запустить эти команды в "ЛогоМиры".
Сначала нужно определить размер файла, который был передан,
для этого 32768 умножаем на 15, итого 491520 бит.
На одной странице выходит 48х8=384 бита информации.
Делим 491520 на 384, получаем 1280 страниц текста
Файл с расширением XLS содержит электронную таблицу. Это расширение программы Excel
Думаю так
<span>var i, n: integer; s: real;
begin write('S N? '); readln(s, n); for i:=1 to n do s:=s*1.02; writeln(s:0:2); readln end.</span>
А проще без цикла:
<span>var n: integer; s: real;
begin write('S N? '); readln(s, n); writeln(s*exp(n*ln(1.02)):0:2); readln end.</span>
А на русском языке программы не составляют. Pascal, C, C++