var a, k, l, m: Integer; begin s:= 0; writeln ('Введите число'); readln(a); if (a>=10) and (a<=999) then k:=a div 100; l:= k div 10; m:= a mod 10; s:= k+m+l; writeln ('Сумма цифр в числе равна ', s); end.
Задача 2.
var i, a, s: Integer; begin s:=0; for i:= 1 to 3 do begin writeln ('Введите число №', i); readln(a); if (a>5) and (a mod 5 = 0) then inc(s); end; writeln('Количество четных чисел, которые делятся на 5 - ', s); end.
Задача 3
var a, b, c, d, max, med, min: Integer; begin writeln ('Введите число'); readln(a); b:= a div 100; c:= b div 10; d:= a mod 10; if (b<c) and (b<d) then min:= b; if (c<b) and (c<d) then min:= c; if (d<c) and (d<b) then min:= d;
if (b>c) and (b>d) then max:= b; if (c>b) and (c>d) then max:= c; if (d>c) and (d>b) then max:= d;
if (b>c) and (b<d) or (b<c) and (b>d) then med:= b; if (c>b) and (c<d) or (c<b) and (c>d) then med:= c; if (d>c) and (d<b) or (d<c) and (d>b) then med:= d;
Устройства ввода подразделяются на следующие категории:
устройства ввода графической, звуковой и видео информации;механические устройства ввода;непрерывные устройства ввода (устройства, предоставляющие входные данные непрерывно, например, мышь, радиоприёмник, ТВ-тюнер);устройства ввода для пространственного использования (например, двухмерная мышь, трёхмерный навигатор).
Компьютерные указывающие устройства ввода по управления курсором делят на следующие категории:
указывающие устройства прямого ввода (управление осуществляется непосредственно в месте видимости курсора (например, сенсорные панели и экраны));непрямые указывающие устройства (например, трекбол,компьютерная мышь).
1)Подойти к телефону
2)Снять трубку
3)Набрать номер
4)Дождаться пока друг ответит на звонок
5)Поговорить с другом
6)Положить трубку
Если сотовый:
1)Достать телефон из кармана
2)Снять блокировку клавиатуры
3)Зайти в меню"КОНТАКТЫ"
4)Найти среди контактов номер друга
5)Нажать на кнопку "вызов"
6)Дождаться пока друг ответит на звонок
7)Поговорить с другом
8)Нажать на кнопку"завершить вызов"
9)Поставить блокировку клавиатуры
10)Положить телефон в карман примерно так