Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
2гбайта=2000000байт
2000000байт/400байт=5000текстовых файлов
program fasf;
var
n,q: integer;
begin
write('введите этаж: ');
readln(n);
q: =n*4;
writeln('квартиры: ',q,q-1,q-2,q-3);
end.
Популярные вопросы