uses crt; var a[1..100] of integer; i,n,count: integer; begincount: =0; read(n); for i: =1 to n do read(a[i]); if a[i]> 0 then inc(count); write(count); end.
Ответ дал: Гость
с компьютера можно редактировать фотографии, создавать тексты, пользоваться интернетом, создавать графические изображения,
делать видео монтаж и.т.д.
если использовать компьютер не по назначению или скачивать с интернета файлы опасные для компьютера может быть компьютерный вирус. чтобы не было вируса можно приобрести антивирус или вообще не скачивать что попало.
Ответ дал: Гость
1. записать числа встолбик, так чтобы цифры самого младшего разряда чисел (единицы) расположились одна под другой (на одной вертикали).
2. вычесть цифры младшего разряда. примечание - если вычитаемое больше уменьшаемого, то следует занять единицу из старшего разряда и после этого вычесть.
3. записать результат под горизонтальной чертой на вертикали единиц.
4. повторить пункты 2 и 3 для всех разрядов с учетом переносов из старших разрядов.
Популярные вопросы