Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
самым главным считается объем
цели создания модели бывают такие:
сохранить информацию о наблюдаемом объекте
передать информацию о нём другим людям
показать,как может выглядеть проектируемый объект
испытать на модели работу объекта ,если испытание объекта-оригинала
опасно или дорого
решить
не оскорбляю людей,а так же не ругаюсь с друзьями.не ругаюсь " словами".не ворую и не бью.
var
a: array[1..100] of integer;
i,s,r: integer;
begin
for i: =1 to 100 do read(a[i]);
for i: =1 to 100 do
if a[i]< 0 then r: =r+a[i] else s: =s+a[i];
end;
writeln('сумма всех положительных чисел= ',s);
writeln('сумма всех отрицательных чисел= ',r);
readln
end.
посчитает максимум 100 чисел.
Популярные вопросы