ВСЕ ЗАДАЧИ В ОДНОЙ
var enter,numberDgigits,i,j,cod,k:integer;
number:string;
ch:char;
begin
writeln('введите целое число');
readln(number);
for i:=1 to length(number)-1 do
if number[i]=number[i+1] then
k:=k+1;
if k<>0 then begin
writeln('в записи числа есть две одинаковые цифры стоящие рядом');
end
else
writeln('в записи числа нету двух одинаковых цифр стоящих рядом');
k:=0;
for i:=1 to length(number)-1 do begin
ch:=number[i];
for j:=1+i to length(number) do
if ch=number[j] then
k:=k+1;
end;
if k<>0 then begin
writeln('в записи числа есть одинаковые цифры');
end
else
writeln('в записи числа нету одинаковых цифр');
val(number,enter,cod);
if (enter>99) and (enter<1000) then begin
writeln('число трехзначное')
end
else
writeln('число не трехзначное');
numberDgigits := 0;
while enter > 0 do begin
numberDgigits := numberDgigits + enter mod 10;
enter := enter div 10;
end;
writeln('сумма цифр = ',numberDgigits);
readln;
end.
Объяснение:
1. Да, цифровые технологии являются частным случаем информационных технологий.
2. Нет, не все информационные технологии являются цифровыми. Например процесс хранения информации путем записи ее с ручки в тетрадь, несомненно является информационной технологией, но не имеет отношения к цифровым технологиям.
3. Да, все цифровые технологии являются информационными, это следует из определения информационных технологий. (Процессы, методы поиска, сбора, хранения, обработки, предоставления, распространения информации и осуществления таких процессов и методов.)
4. Цифровая технология использует цифровое дискретное представление информации, как правило сигналами 1 и 0 (в некоторых случаях еще null), что позволяет широко использовать электронную вычислительную технику для организации информационных процессов.
1491 книга.
Объяснение:
1 символ = 1 Б (в UTF-8)
10 ГБ = 1024^3 Б
В 1 книжке 300 * 40 * 60 = 720000 символов = 720000 Б
Разделим 1024^3 на 720000 = 1491.308089...
Итого: 1491.