import random
a=[]
s=0
kp=0
ko=0
for i in range (20):
(отступ)a.append(random.randint(-10,20))
(отступ)print("%5d" % (a[i]),end="")
(отступ)s += a[i]
(отступ)if a[i]>0:
(отступ, отступ)kp += 1
(отступ)if a[i]<0:
(отступ, отступ)ko += 1
print()
print ("s =",s)
print ("kp =",kp)
print ("ko =",ko)
Объяснение:
s - сумма всех элементов
kp - количество положительных элементов
ko - количество отрицательных элементов
В цикле:
1) задаём значение элемента
2) выводим значение элемента на экран
3) вычисляем сумму всех элементов
4) используя условие вычисляем количество положительных элементов
5) используя условие вычисляем количество отрицательных элементов
Выводим на экран результаты
Картинки (экран, к сожалению, очень узкий)
var
i, n:integer;
price:real;
begin
n := 20;
price := 20.4;
for i := 1 to n do
writeln('Стоимость ', i:3, ' ед. товара составляет ', price * i:8:2, ' руб.');
end.
//вторая задача
var
i, f, n:integer;
begin
f := 453;
n := 10;
writeln('фунты граммы');
for i := 1 to n do
writeln(' ', i:2, i * f :11);
end.
//третья задача
var
i, n:integer;
k:real;
begin
n := 20;
writeln('Введите курс '); readln(k);
writeln('доллары рубли');
for i := 1 to n do
writeln(' ', i:2, i * k:13:2);
end.