Написать програмы на паскале №1 в области 12 райнов. известны количество жителей каждого района (в тысячах человек) и плотность населения в нем (тыс. чел./ км2). определить общую площадь территории области. №2 известны результаты двух спортсменов-пятиборцев в каждом из пяти видов спорта в . определить сумму , полученных каждым спортсменом.
Ответы на вопрос:
2.
vara1,a2,a3,a4,a5,a: integer; b1,b2,b3,b4,b5,b: integer; beginreadln (a1,a2,a3,a4,a5); readln (b1,b2,b3,b4,b5); a: =a1+a2+a3+a4+a5; b: =b1+b2+b3+b4+b5; writeln (a,' ',b); end.
1. vara1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12: integer; b1,b2,b3,b4,b5,b6,b7,b8,b9,b10,b11,b12: integer; n: integer; beginreadln (a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12); readln (b1,b2,b3,b4,b5,b6,b7,b8,b9,b10,b11,b12); n: =a1*b1+a2*b2+a3*b3+a4*b4+a5*b5+a6*b6+a7*b7+a8*b8+a9*b9+a10*b10+a11*b11+a12*b12; writeln (n); end.
using System;
public class Program
{
public static void Main()
{
/*Даны два целых числа: D (день) и M (месяц),
определяющие правильную дату невисокосного года. Вывести значения D и M для даты, следующей за указанной. */
int D = Convert.ToInt32(Console.ReadLine());
int M = Convert.ToInt32(Console.ReadLine());
switch (M)
{
case 1:
case 3:
case 5:
case 7:
case 8:
case 10:
if (D == 31)
{
Console.WriteLine(D = 1);
Console.WriteLine(M = M + 1);
break;
}
else if (D > 31)
{
Console.WriteLine("Такой даты нет!");
break;
}
else
{
Console.WriteLine(D + 1);
Console.WriteLine(M);
break;
}
case 2:
if (D == 28)
{
Console.WriteLine(D = 1);
Console.WriteLine(M = M + 1);
break;
}
else if (D > 28)
{
Console.WriteLine("Такой даты нет!");
break;
}
else
{
Console.WriteLine(D + 1);
Console.WriteLine(M);
break;
}
case 4:
case 6:
case 9:
case 11:
if (D == 30)
{
Console.WriteLine(D = 1);
Console.WriteLine(M = M + 1);
break;
}
else if (D > 30)
{
Console.WriteLine("Такой даты нет!");
break;
}
else
{
Console.WriteLine(D + 1);
Console.WriteLine(M);
break;
}
case 12:
if (D == 31)
{
Console.WriteLine(D = 1);
Console.WriteLine(M = 1);
break;
}
else if (D > 31)
{
Console.WriteLine("Такой даты нет!");
break;
}
else
{
Console.WriteLine(D + 1);
Console.WriteLine(M);
break;
}
}
}
}
Объяснение:
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
alesia408.01.2021 20:08
-
alinka57d26.06.2021 15:52
-
dashavr109.08.2022 08:56
-
angelenok184007.01.2021 21:42
-
ЛилияЕршова19.06.2022 13:47
-
nikita030303b23.01.2022 23:54
-
aliskylivar28.08.2020 17:41
-
nastya06nastik23.02.2021 22:30
-
milana0372milana14.10.2021 19:18
-
Жанна64427.10.2022 14:25
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.