Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
dim a(12), b(12), c(12)
input "введите размерность массивов а и в - m= ", m
print "введите элементы массивов а и в: "
for i=1 to m
input a(i), b(i)
next i
s=0
for i = 1 to m
c(i)= a(i) + b(m-i+1)
s= s+c(i)
print "массив а: "
print a(i);
print
print "массив b: "
print b(i);
print "массив c: "
print c(i);
print "сумма элементов массива с ="; s
1)первый ключ сразу подошел к двери.2)второй ключ подошел т.е проверили 2.3)третий подошел т.е проверили 3ключа.4)четвертый подошел т.е проверили 4 ключа.
стр1: 'дерево';
стр2: 'обработка';
стр3: стр1+стр2;
стр3: ='деревообработка';
program xxx;
var i, x, s : integer;
begin
write('введите число х=');
readln(x);
s: =0
i: =1
while i < =x do
s: =s+i;
i: =i+2
end;
write('сумма нечетных чисел ='; s);
readln
end.
Популярные вопросы