Подскажите, что не так сделал? почему программа не умножает c на a? var p,a,i: integer; begin p: =8; for i: =1 to 10 do begin writeln ('введите двузначное число'); readln (a); p: =p*a; end; readln (p); end.

115

437

Посмотреть ответы 2

Ответы на вопрос:

countrestrikegl

Информатика

4,8(81 оценок)

Для начало нужно конкретное , я так понимаю, что каждое введенное число должно быть умножено(на 8) и выведено, причем итерация должна быть исполнена 10 раз? и в твоей программе нет c. попробуй так var p, a, i: integer; begin p : = 8; for i : = 1 to 10 do begin writeln('введите двузначное число'); readln(a); p : = p * a; writeln(p); end; end.

Ромзэс1

Информатика

4,8(28 оценок)

|19+21=40 - всего цветов 40-20 - останется цветов, после того, как девочка соберёт цветы. 1. нет. т.к. 20-19=1 - число обязательных георгинов. 2. да. так же 20-19=1 - число обязательных георгинов. 3. нет. т.к 21-20=1 - число оставшихся георгинов, если девочка собирала только их. 4.нет. 19-20=|-1| - минимальное количество собранных цветов помимо астр 5. да. 21-20=1 - число оставшихся георгинов, если девочка собирала только их.