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

Дано висоту гори h м над рівнем моря. Визначити, до якого типу гір вона відноситься.

h<1000 – низькі гори (low)

1000<=h<=2000 – середні гори (middle)

h>2000 – високі гори (high)

Контрольні приклади

1) h= 752 => low
2) h= 1456 => middle
3) h= 2358 => high

Показать ответ
Ответ:
nonolo07
nonolo07
31.07.2022 04:16
#include <iostream>
#include <stdio.h>
using namespace std;

int main(){
    int y;
    cin>>y;
    y=y%12;
    switch (y){
           case 4:{cout<<"Mouse"; break;}
           case 5:{cout<<"Bull";break;}
           case 6:{cout<<"Tiger";break;}
           case 7:{cout<<"Rabbit";break;}
           case 8:{cout<<"Dragon";break;}
           case 9:{cout<<"Snake";break;}
           case 10:{cout<<"Horse";break;}
           case 11:{cout<<"Goat";break;}
           case 0:{cout<<"Monkey";break;}
           case 1:{cout<<"Cock";break;}
           case 2:{cout<<"Dog";break;}
           case 3:{cout<<"Pig";break;}
           }
    cin.get();
    cin.get();
    return 0;
}
0,0(0 оценок)
Ответ:
polina3510
polina3510
17.07.2021 03:02
//Большую часть времени убил на тесты
//Pascal ABC.NET v3.1 сборка 1172

Type
 ty=record
  sub,name,ot,ul,kv,ho:string;
  mo,ye:integer;
 end;

Var
 ar1,ar2:array of ty;
 k,i,n:integer;
 s:string;
begin
 readln(k);
 setlength(ar1,k);
 n:=0;
 for i:=0 to k-1 do
  begin
   write('Введите фамилию рабочего №',i+1,':'); readln(ar1[i].sub);
   write('Введите имя рабочего:№',i+1,':'); readln(ar1[i].name);
   write('Введите отчество рабочего:№',i+1,':'); readln(ar1[i].ot);
   write('Введите улицу проживания рабочего:№',i+1,':'); readln(ar1[i].ul);
   write('Введите дом проживания рабочего:№',i+1,':'); readln(ar1[i].ho);
   write('Введите квартиру проживания рабочего:№',i+1,':'); readln(ar1[i].kv);
   write('Введите месяц поступления на работу рабочего:№',i+1,':'); readln(ar1[i].mo);
   write('Введите год поступления на работу рабочего:№',i+1,':'); readln(ar1[i].ye);
  end;
 write('Введите искомую улицу:'); readln(s);
 writeln('Результаты:');
 for i:=0 to k-1 do
  begin
   if ar1[i].ul=s then
    begin
     inc(n);
     setlength(ar2,n);
     ar2[n-1]:=ar1[i];
     writeln('Рабочий #',i+1,',', ar2[n-1].sub,' ',ar2[n-1].name,' ',ar2[n-1].ot);
     writeln('Адрес:',ar2[n-1].ul,' ',ar2[n-1].ho,',',ar2[n-1].kv);
     writeln('Дата поступления на работу:',ar2[n-1].mo,',',ar2[n-1].ye);
    end;
  end;
end.
    
Пример ввода:
3
Введите фамилию рабочего №1:Хацуне
Введите имя рабочего:№1:Мику
Введите отчество рабочего:№1:Ивановна
Введите улицу проживания рабочего:№1:Омотесандо
Введите дом проживания рабочего:№1:23
Введите квартиру проживания рабочего:№1:34
Введите месяц поступления на работу рабочего:№1:1
Введите год поступления на работу рабочего:№1:1998
Введите фамилию рабочего №2:Двачевская
Введите имя рабочего:№2:Алиса
Введите отчество рабочего:№2:Петровна
Введите улицу проживания рабочего:№2:Пушкина
Введите дом проживания рабочего:№2:223
Введите квартиру проживания рабочего:№2:34
Введите месяц поступления на работу рабочего:№2:2
Введите год поступления на работу рабочего:№2:1997
Введите фамилию рабочего №3:Персунов
Введите имя рабочего:№3:Семён
Введите отчество рабочего:№3:Олегович
Введите улицу проживания рабочего:№3:Омотесандо
Введите дом проживания рабочего:№3:23
Введите квартиру проживания рабочего:№3:34
Введите месяц поступления на работу рабочего:№3:6
Введите год поступления на работу рабочего:№3:2000
Введите искомую улицу:Омотесандо

Пример вывода:
Результаты:
Рабочий #1,Хацуне Мику Ивановна
Адрес:Омотесандо 23,34
Дата поступления на работу:1,1998
Рабочий #3,Персунов Семён Олегович
Адрес:Омотесандо 23,34
Дата поступления на работу:6,2000
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота