М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
gandurska1
gandurska1
03.10.2021 18:24 •  Информатика

Паскаль. розгалудження. скласти програму, яка дає довідку про назву столиці (st) та про кількість населення (nas, у мільйонах) деякої країни( kr) з такого переліку: угорщина, італія, україна.

👇
Ответ:
Iaro
Iaro
03.10.2021
Const
  St: array[1..3] of string = ('Будапешт', 'Рим', 'Киев');
  Nas: array[1..3] of real = (9.9, 61.5, 44.3);
  Kr: array[1..3] of string = ('Венгрия', 'Италия', 'Украина');
  {Сведения о численности населения приведены по данным ресурса
   CountryMeters по состоянию на 03.07.2014}

var
  i: integer;

begin
  write('Введите 1-Венгрия, 2-Италия, 3-Украина -> ');
  readln(i);
  if i in [1..3] then
    writeln('Страна- ', Kr[i], ', столица- ', St[i], ', население (млн.чел.)- ', Nas[i])
  else
    writeln('Неверный ввод!')
end.

Тестовое решение:

Введите 1-Венгрия, 2-Италия, 3-Украина -> 2
Страна- Италия, столица- Рим, население (млн.чел.)- 61.5
4,7(14 оценок)
Открыть все ответы
Ответ:
ermekbaevadinara
ermekbaevadinara
03.10.2021

#include<iostream>

using namespace std;

int main(){

setlocale(LC_ALL,"rus");

int x;

cout<<"введите номер части";

cin>>x;

switch(x){

case 1:

cout <<"Философский камень" ;

break;

case 2:

cout << "Тайная комната" ;

break;

case 3:

cout << "Узник Азкабана" ;

break;

case 4:

cout << "Кубок огня" ;

break;

case 5:

cout << "Орден Феникса" ;

break;

case 6:

cout << "Принц-полукровка";

break;

case 7:

cout << "Дары Смерти.";

break;

default:"Такая часть не вышла и не выйдет  ";

}

return 0;

}

Объяснение:

4,6(42 оценок)
Ответ:
negatiff95
negatiff95
03.10.2021

1

//Вводим a,b,c

Console.WriteLine(hello);

if(a == b || a==c || b==c){

Console.WriteLine("Треугольник равнобедренный");

}else{

Console.WriteLine("Треугольник НЕ равнобедренный");

}

2

int x1,x2,x3,x4;

int x;

//Вводим число x

   x1 = (x - (x % 1000)) / 1000;

   x2 = ((x - (x % 100)) - (x - (x % 1000))) / 100;

   x3 = ((x - (x % 10)) - (x - (x % 100))) / 10;

   x4 = x % 10;

if((x1 == 6) || (x1 == 9) || (x2 == 6) || (x2 == 9) || (x3 == 6) || (x3 == 9) || (x4 == 6) || (x4 == 9)){

Console.WriteLine("Входит");

}else{

Console.WriteLine("не входит");

}

3

float x,y,z;

// Вводим x,y,z

if(x >= 0,5 && x<=5,1) Console.WriteLine(x, " Входит");

if(y >= 0,5 && y<=5,1) Console.WriteLine(y, " Входит");

if(z >= 0,5 && z<=5,1) Console.WriteLine(z, " Входит");

4 задания к сожалению не понял

4,5(8 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ