USES crt;VAR a,b,c: integer;begincls;repeatWRITE('Введите двухзначное число: '); READLN (a);until (a>=10)and(a<=99);b:=a div 10;c:=a mod 10;if b>c then writeln ('Первая цифра больше.');if b<c then writeln ('Вторая цифра больше.');if b=c then writeln ('Первая и вторая цифры равны.');END.
<span>Диски бувають різні: гнучкі магнітні диски (дискети), жорсткі магнітні диски (вінчестери), лазерні (компакт-диски) та інші.
Для того, щоб прочитати інформацію з диска або записати її на диск, використовують спеціальні пристрої — дисководи.
Ми вже знаємо, що інформація зберігається на дисках.
Дисковод для гнучких магнітних дисків має ім'я А:. Вінчестер поділяють на кілька частин. Кожна з них вважається окремим диском. Якщо, наприклад, таких дисків три, то їх імена С:, D:, Е: Тоді дисковод для лазерних дисків має ім'я Р:.
</span><span>Чи знаєте ви, як інформація зберігається на диску?
Вся інформація на дисках зберігається у файлах.
Текстовий документ, малюнок, пісня, мультфільм, програми, які записані на диск, — все це файли.
Кожен файл має своє ім'я. Файли об'єднують у групи — папки. Кожна папка теж має своє ім'я.
Знайди па Робочому столі піктограму Мой компьютер, підведи до неї вказівник миші і двічі клацни лівого кнопкою.
Відкривається вікно. У ньому знаходяться піктограми дисків, які є на твоєму комп'ютері.
Підведи вказівник миті до піктограми диска С: і двічі клацни лівою кнопкою. У вікні з'являться піктограми лапок і файлів, які є на диску С;.
Підведи вказівник миші до піктограми будь-якої папки і двічі клацни лівою кнопкою миші. У вікні з'являються піктограми папок і файлів, що знаходяться у цій папці.
Зверни увагу на те, що всі папки мають однакову піктограму і їх можна відрізнити по назві. Файли ж різного змісту (текст, малюнок, програма, звук тощо) мають різні
піктограми, характерні для цього типу файлу.
Якщо ти хочеш побачити, що знаходиться в попередній папці, підведи вказівник
мини до кнопки верхній частині вікна і клацни лівою кнопкою миші.
</span><span>
</span>
Плюсы: узнаешь много нового для себя, общаешься с друзьями, интересно проводишь время.
Минусы: очень часто: портится осанка, не делается дз, ухудшается зрение из-за постоянного сидения за компьютером, а вообще, лучше гулять на улице и с друзьями:)
<span>var a:array[1..10] of integer;
i:integer;
begin
for i:=1 to 10 do begin
a[i]:=2*i+1;
write(a[i]:3);
end;
end.</span>