Var a,b,c: integer;
Begin
write('Введите двузначное число: ');
readln (a);
b:=a div 10;
c:=a mod 10;
writeln('<span>Перевернутое число: </span>',c,b)
End.
Сл.1:.
тема: усройство вводаинформации
сл. 2
Устройства ввода информации – это устройства, которые переводят информацию с языка человека на машинный язык. К устройствам ввода информации относятся следующие устройства: 1. Клавиатура; 2. Сканер; 3. Цифровые фотокамеры; 4. Средство речевого ввода (микрофон); 5. Координатные устройства ввода ( мышь, трекбол ); 6.Сенсорные устройства ввода (световое перо, сенсорный экран, дигитайзер). Устройства ввода информации.
сл. 3:
Клавиатура – это клавишное устройство для ввода числовой и текстовой информации, а так же подачи управляющих сигналов, которое содержит стандартный набор клавиш пишущей машинки и некоторые дополнительные клавиши – управляющие и функциональные клавиши, клавиши управления курсором и малую цифровую клавиатуру. Клавиатура.
сл.4:
Мыши, трекболы и дигитайзеры являются ручными манипуляторами и обычно подключаются к последовательному порту ПК. При перемещении манипулятора по столу (или планшету) синхронно с ним по экрану монитора перемещается курсор. Почти все манипуляторы имеют кнопки, используемые для фиксации конкретной позиции экрана. Эти устройства подразделяются на две категории – относительные и абсолютные. Относительными являются, например, мышь, трекбол, джойстик, точпад; абсолютным – дигитайзер. Манипуляторы связываются с ПК посредством соответствующих драйверов. Манипуляторы – мыши, трекболы.
сл. 5:
Одним из традиционных устройств ввода является манипулятор мышь, в ранних советских ЭВМ фигурировавшая под названием «колобок». Это устройство было изобретено достаточно давно – ещё в 1970-х гг. Мышь
сл. 6:
Виды мыши:
3.Оптическая мышь. Внутри корпуса находятся 2 пары светодиодов и фотоэлементов. Один светодиод обычно излучает красный свет, а другой инфракрасный. 4.«Бесхвостые» (инфракрасные) мыши для передачи сигналов используют приёмник инфракрасного излучения, который кабелем присоединяется к ПК и располагается или на ПК, или устанавливается где-то рядом.
сл. 7:
спасибо за внимание.
var
a: 1000..9999; //Четырехзначное число
a1, a2, a3, a4: 1..9;
begin
writeln('Введите четырехзначное число');
readln(a);
a1:= a mod 10; //Первая с конца цифра
a2:= (a mod 100) div 10; //Вторая с конца цифра
a3:= (a mod 1000) div 100; //Третья с конца цифра
a4:= a div 1000; //Четвертая с конца цифра
writeln('Сумма цифр данного числа: ', a1 + a2 + a3 + a4); //Сумма цифр
end.
Вот пример кода:
program Znanija;
var
cena, kolvokg, dengi, sdacha, nyno :Integer;
begin
read(cena);
read(kolvokg);
read(dengi);
nyno:=cena*kolvokg;
sdacha:=dengi-nyno;
write('Надо = ');
write(nyno);
write('; сдача = ');
write(sdacha);
end.