Program z1;
var n:integer;
i:integer;
r:integer;
begin
writeln('Введите количество желающих');
readln(n);
i:=0;
r:=0;
while(n>0) do
begin
writeln('Введите рост ученика : ');
readln(r);
if(r>170) then i:=i+1;
n:=n-1;
end;
writeln(i);
end.
Зависать вконтактике вместо того, что работать. А если серьезно: программист пишет код и тестирует программы на разных языках программирования. Журналист печатает статьи в бумажном( с помощью принтера) или электронном варианте, ищет газеты и журналы, с которыми он бы мог сотрудничать, через интернет. Бухгалтер обрабатывает документы в электронном формате, подсчитывает деньги с помощью специальных программ, ведет базы данных. Юрист узнает с помощью Интернета о новых законах. Директор осуществляет связь со своими подчиненными, ведет документацию, Преподаватель скачивает презентации, видеоролики для уроков. Доктор узнает о новинках в фармакологии, смотрит образовательные ролики для повышения квалификации. Водитель с помощью компьютера узнает о том, какие дороги сломаны и как искать обходные пути, как правильно управлять новейшими моделями автомобилей, использует дорожные карты. Швея узнает, что сейчас в моде, ищет новые выкройки, закупает материалы. Повар ищет новые рецепты.
В Linux несколько другие правила построения имен файлов, поэтому вам придется с этим смириться. Начнем с того, что в Linux нет такого понятия, как расширение файла. В Linux несколько другие правила построения имен файлов, поэтому вам придется с этим смириться. Начнем с того, что в Linux нет такого понятия, как расширение файла. Например, возьмем имя файла Documentl.doc. В Windows именем файла является Document 1, a doc — это расширение. В Linux Documentl.doc — это имя файла, расширения нет.
Максимальная длина имени файла — 254 символа. Имя может содержать любые символы (в том числе и кириллицу) , кроме /, \, ?,<, >, *, \ |. Кириллицу в именах файлов я бы не рекомендовал вообще использовать. Если вы уверены, что не будете эти файлы передавать Windows-пользователям (на дискете, по электронной почте) — используйте на здоровье. А если же нужно будет отправить файл по электронной почте (кодировка-то у всех разная, поэтому вместо русскоязычного имени пользователь увидит абракадабру) , лучше использовать латиницу в имени файла.
Также вам придется привыкнуть к тому, что система Linux чувствительна к регистру в имени файла: FILE.txt и FiLe.Txt — это два разных файла.
<span>Для разделения элементов пути используется символ / (прямой слэш) , а не \ (обратный слэш) , как в Windows.</span>
Если не правельно,извините,но я думаю что,это сообщение правельльно читается-РОЖДЕНОЕ.Этотвопрос у меня был и это ответ по моему мнению правельный.
Var
mas:array[1..10]of integer;
i:integer;
Begin
write('Введите 10чисел: ');
for i:=1 to 10 do readln(mas[i]);
write('Четными являются: ');
for i:=1 to 10 do<span> if (mas[i] mod 2 = 0) then write(mas[i],' ');
</span>End.