В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
ник4430
ник4430
24.08.2021 14:47 •  Информатика

С ИНФОЙ 1)Напишите почтовый адрес пользователя на компьютере с именем perm.ru, если его учетная запись на нём v-pavlov
2)Один из самых массовых советских танков, имевший более десятка модификаций, построенный на базе английского танка. В армии Финляндии использовался до 60х годов 20го века. НАЗОВИТЕ МОДЕЛЬ ТАНКА, ГОД ВЫПУСКА И ГДЕ ИСПОЛЬЗОВАЛСЯ

Показать ответ
Ответ:
erlan002
erlan002
08.03.2020 23:01
Системный подход рассматривает явление в целостности его частей, а не по отдельным частям. Так, если вы покупаете машину, то надо смотреть не один ее внешний вид, но и стоимость, а также расход топлива, наличие фирм ремонта и так далее. Нарушение системного подхода ведет к катастрофе, скажем к изменению климата - желание выпускать все больше продукции и строительство предприятий ведет к "тепловому удару".  В биологии нарушение единой системы жизни  в некоторой местности, то есть нарушение биоценоза, также ведет к тяжелым последствиям - излишнее увеличение численности птиц приводит к исчезновению насекомых, среди которых могут быть полезные. А излишнее уменьшение числа птиц ведет к росту числа насекомых и они могут губить леса.
0,0(0 оценок)
Ответ:
Qwer948
Qwer948
08.08.2022 06:04

var

 a, s: real; //a - вводимое с клавиатуры число, s - сумма чисел

 

begin

  a:= 1;  //Присваиваем начальное значение, чтобы цикл выполнился

  s:= 0;

  while a <> 0 do   

  begin

    writeln('Введите положительное число');

    readln(a);

    if a < 0 then

    begin

      writeln('Введено не положительное число. Повторите ввод заново');

      continue; {Если а - не положительное число, вводим число заново}

    end;

    s:= s + a;

  end;

  writeln('Сумма:  ', s);  //Выводим сумму

end.

  

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота