1.чем можно заменить сканер?
а.планшет
б.монитор
в.смартфон(телефон с камерой)
г.фотоаппарат
д.все приведенные
е. другое:
2.какими бывают сканеры?
а.планшетный
б.барабанный
в.ленточный
г.лентопротяжный
д.текстовый
е.настольный
3.запишите последовательность операций по сканированию текста(правильная последовательность цифр)
1.сканировать и распознать
2.создать цифровую копию
3.распознанный текст переноситься в окно текстового редактора
4.поместить объект под крышку сканера
5.программа распознаёт текст
4.для чего служат компьютерные словари?
5.чем отличаются словари от программ переводчиков?
6.почему программы переводчики не используются при переводе художественных произведений?
ответ: тигры занесены в красную книгу, к ним нужно относиться бережно :-)
program ChetNechet;
var
A, B, chet, nechet, otvet, i: Integer;
begin
Write ('Введите А, В: ');
ReadLn (A, B);
chet := 0;
nechet := 0;
for i := A to B do begin
if i mod 2 = 0 then
Inc (chet)
else
Inc (nechet);
end;
otvet := chet - nechet;
WriteLn ('Четных: ', chet);
WriteLn ('Нечетных: ', nechet);
WriteLn ('ответ: ', otvet);
ReadLn;
end.
Объяснение:
for i := A to B do begin
цикл перебирает числа от А до В включительно.
если верхняя граница должна быть В + 1 то есть на 1 больше, то исправьте
Объяснение:
2.
итерационные циклы
while, repeat - until
условие выполнения цикла может быть любым выражением, возвращающим тип Boolean
шаг изменения любой
цикл с параметром
for
начальное и конечное значения - целые числа
шаг изменения параметра равно 1
количество итераций = [конечная граница] - [начальная граница] + 1
3.
цикл с предусловием
while
минимальное количество итераций = 0 (случай, когда условие while не выполняется при первом проходе)
максимальное количество не ограничено
цикл с постусловием
repeat - until
минимальное количество итераций = 1 (условие выхода проверяется в конце цикла, хотя бы один раз цикл выполнится)
максимальное количество не ограничено