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

2. День Первого Президента Республики Казахстан-доблестный праздник независимого Казахстана Допустим, в рамках Недели Первого Президента в вашей школе было проведено много мероприятий. Напишите краткий обзор проведения мероприятий, участников. В своем обзоре используйте периодические, адресные наречия.

3. молодежь и средства массовой информации
Вы прочитали интересную статью на сайте школы. Напишите аннотацию на основе этой статьи.

Показать ответ
Ответ:
Котенок050402
Котенок050402
16.01.2020 06:47

лекарственная лавка

имгеүет

аптеки

дарыуханалар

аптеки ведут заготовку лекарственных трав

аптекалар шифалы үләндәр әҙерләй

в аптеке

аптекала

взять лекарства в аптеке

аптеканан дарыу алыу

Где ближайшая аптека?

Яҡында ҡайҙа дарыухана бар?

взять лекарства в аптеке

аптеканан дарыу алыу

Есть в вашем селе школа (больница, аптека)?

Һеҙҙең ауылда мәктәп (дауахана, дарыухана) бармы?

Есть ли у вас в селе школа (больница, аптека)?

Һеҙҙең ауылда мәктәп (больница, аптека) бармы?

идти в аптеку

аптекаға барырға, дарыуханаға барырға

как в аптеке

аныҡ, теп-теүәл

купить витамины в аптеке

аптеканан витамин һатып алыу

0,0(0 оценок)
Ответ:
paliy2006
paliy2006
26.04.2021 14:33

var

 N, i, P, O, Z : Integer;

 R : Real;

begin

 Write('n = '); ReadLn(N);

 P := 0; O := 0; Z := 0;

 // для for         // для while       // для repeat

 for i := 1 to N do // i := 0;         // i := 0;

                    // while i < N do  // repeat

   begin            // begin           //   Inc(i)

                    //   Inc(i);

     Write(i, ' число = '); ReadLn(R);

     case sign(R) of

       +1 : Inc(P);

       -1 : Inc(O);

        0 : Inc(Z);

      end;

   end;             // end;            // until i = N;

 WriteLn('Процент положительных чисел: ', P*100/N);

 WriteLn('Процент отрицательных чисел: ', O*100/N);

 WriteLn('      Процент нулевых чисел: ', Z*100/N);

end.

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