Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1) возраст
2)трудолюбие
3)ум
4)имена
5)хитрость
у них были разные имена, разные дома, и все по разному мыслили
паскаль же?
var s, x: string; c, n, err, i, d, k: integer; begin readln (s); n: =length(s); for i: =1 to n do begin
d: =d+k;
val(s,k,err);
end;
write (d);
end.
2гбайта=2000000байт
2000000байт/400байт=5000текстовых файлов
Популярные вопросы