var
a:integer;
begin
readln (a);
repeat
a:=a+1;
until (a mod 2=0);
writeln (a);
end.
А) тип входной информации - числовая;
правило преобразования - сумма цифр числа;
6201 - 9
б) предположу, что в этом задании допущена опечатка - числа 6200 и 3100 в последнем столбце нужно поменять местами. В этом случае:
тип входной информации - числовая;
правило преобразования - исходное число умножается на 2;
235*2 = 470
в) тип входной информации - числовая;
правило преобразования - исходное число переводится в двоичную систему счисления;
620(10) = 1 001 101 <span>100(2)
г) </span>тип входной информации - числовая;
правило преобразования - исходное число целочисленно делится на 2 (остаток отбрасывается);
235 / 2 = 117
д) тип входной информации - числовая;
правило преобразования - определяется остаток от деления исходного числа на 5;
235 - 0
е) тип входной информации - символьная;
правило преобразования - подсчитывается количество русских букв в заданной последовательности символов;
Ура! - 3
ж) тип входной информации - символьная;
правило преобразования - подсчитывается количество гласных русских букв в заданной последовательности символов;
Фыва - 2
з) тип входной информации - символьная;
правило преобразования - из заданной последовательности символов берутся символы с номерами 1, 3, 5, ...;
8 бит - 8бт
и) тип входной информации - текстовая;
правило преобразования - определяется первая гласная русских буква в заданном слове;
монитор - О
к) тип входной информации - текстовая;
правило преобразования - буквы данного слова располагаются по алфавиту;
система - аеимсст
Const N = 40;
var
a:array[1..N] of integer;
i,j,s:integer;
st:real;
begin
for i:=1 to N do readln(a[i])
s:=0; st:=0;
for i:=1 to N do
if (a[i]>9)and(a[i]<100)and(a[i] mod 2=0) then
begin s:=s+1; st:=st+a[i];end;
if s>0 then writeln('Среднеарифметическое = ',st/s:4:1)
else writeln('Искомых чисел нет');
end.
Пример (для n=20):
<span>416
295
-848
-881
-325
-690
139
-220
992
607
-998
400
720
-536
757
-123
-559
-941
22
-748
Среднеарифметическое = 22.0</span>
Если это живой объект, то управлять можно только с его согласием.