( Решение на Pascal )
Не совсем ясно, каким образом составители задачи планировали найти среди случайных вещественных 10 чисел в диапазоне от -60 до 100 числа, кратные 8.
Но ради Бога:
var A: array [1..10] of real;
var i,s: integer;
begin
s:=0;
randomize();
for i:=1 to 10 do
begin
A[i]:=random()*160-60;
write(A[i]:3:5,' ');
if (A[i]>10) and (A[i]-trunc(A[i])=0)
and (trunc(A[i]) mod 8 =0) then
s:=s+1;
end;
writeln();
writeln('Количество элементов массива,',
'кратных числу 8 и больших 10: ',s);
end.
![Дан одномерный массив A[10]. Элементы массива – это вещественные случайные числа большие -60 и меньш](/tpl/images/1121/2362/afcf4.jpg)
1) Документ - это письменное подтверждение какого-либо события или факта
2) Текстовый документ - это представленная на бумажном, электронном или ином материальном носителе информация в текстовой форме
3) Раздел, строка, страница(это не точно)
4) Рассказ, письмо, справочник
5) Раздел - это часть текста, разделы могут включать в себя подразделы.
6) Текст, таблицы, рисунки (зависит это от того, какого типа документ)
7) Удобство редактирования, лёгкость копирования, лёгкость передачи по сетям
8) Электронная книга - это компактное устройство, которое предназначено для отображения текстовой информации, представленной в электронном виде
9) В электронных книгах существует поиск по тексту
10) С текста человек может передать свои мысли, чувства и эмоции
s1='';
s2='';
var
i,p:integer;
s:string;
begin
Write('Введите текст: '); Readln(s);
for i:=1 to Length(s) do
begin
p:=Pos(s[i],s1);
if p>0 then s[i]:=s2[p]
end;
Writeln('Результат: ',s)
end.
Тестовое решение:
Введите текст: HELLO, WORLD!
Результат: SVOOL, DLIOW!
Символы не вошедшие в шаблон замены, не шифруются.