Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program xxx;
s : string;
a : integer;
begin
writeln('введите строку символов: '
readln (s);
a: = length(s);
if a mod 2= 0 then writeln ('четное') else writeln('не четное');
readln;
end.
папирусы хранили в виде свитков, сворачивая длинную папирусную ленту, склеенную из отдельных листов, в трубку.
исполняемые файлы:
test.exe = 459 кб
photo.exe = 117 кб
letter.com - 198 кб
графические файлы:
nature.jpg = 314 кб
program.bmp = 361 кб
текст. документы:
comp.doc = 238 кб
получается порядок:
test.exe
program.bmp
nature.jpg
comp.doc
letter.com
photo.exe
в феврале 1946 года был создан первый компьютер.
Популярные вопросы