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

Паскаль

дан возраст человека в годах (0..99 лет). написать программу, которая называет возраст по-. например: если ввести «1», то программа должна выдать - «1 год», если ввести «22», то программа должна выдать - «22 года», если ввести «45», то программа должна выдать - «45 лет», и так для каждого числа в диапазоне от 0 до 99. разрешается использовать в программе не более 5 операторов if.

👇
Ответ:
lisofoxi
lisofoxi
25.12.2021

Program vozrast;

var x,y : integer;

var godik: string;

Begin

readln(x);

y:=x mod 10;  

if (y=0) or (y>=5) then godik:='Лет';

if (y=1)  then godik:='Год';

if (y>=2) and (y<=4)  then godik:='Года';

if (x>=11) and (x<=14) then godik:='Лет';

writeln(x,' ',godik);

End.

4,6(81 оценок)
Ответ:
BOYECH
BOYECH
25.12.2021

program gg;

var e:integer;

begin

writeln ('Введите возраст');

read (e);

if e > 99 then

writeln ('Введите возраст до 99 лет')

else if (e mod 10 = 1) and (e <> 11) then

writeln (e,' год')

else if (e >= 2) and (e <= 4) or (e mod 10 = 2) or (e mod 10 = 3) or (e mod 10 = 4) then

writeln (e,' года')

else if (e >= 5) and (e <= 150) then

writeln (e,' лет')

end.

4,8(54 оценок)
Открыть все ответы
Ответ:
Vadimus2005
Vadimus2005
25.12.2021

это процесс распределения всех элементов массива в определенном порядке. Очень часто это бывает полезным. Например, в вашем почтовом ящике электронные письма отображаются в зависимости от времени получения; новые письма считаются более релевантными, чем те, которые вы получили полчаса, час, два или день назад; когда вы переходите в свой список контактов, имена обычно находятся в алфавитном порядке, потому что так легче что-то найти. Все эти случаи включают в себя сортировку данных перед их фактическим выводом

Объяснение:

Как работает сортировка?

Сортировка данных может сделать поиск внутри массива более эффективным не только для людей, но и для компьютеров. Например, рассмотрим случай, когда нам нужно узнать, отображается ли определенное имя в списке имен. Чтобы это узнать, нужно проверить каждый элемент массива на соответствие нашему значению. Поиск в массиве с множеством элементов может оказаться слишком неэффективным (затратным).

Однако, предположим, что наш массив с именами отсортирован в алфавитном порядке. Тогда наш поиск начинается с первой буквы нашего значения и заканчивается буквой, которая идет следующей по алфавиту. В таком случае, если мы дошли до этой буквы и не нашли имя, то точно знаем, что оно не находится в остальной части массива, так как в алфавитном порядке нашу букву мы уже !

Не секрет, что есть алгоритмы поиска внутри отсортированных массивов и получше. Применяя простой алгоритм, мы можем искать определенный элемент в отсортированном массиве, содержащем 1 000 000 элементов, используя всего лишь 20 сравнений! Недостатком, конечно же, является то, что сортировка массива с таким огромным количеством элементов — дело сравнительно затратное, и оно точно не выполняется ради одного поискового запроса.

В некоторых случаях сортировка массива делает поиск ненужным. Например, мы ищем наилучший результат прохождения теста среди студентов. Если массив не отсортирован, то нам придется просмотреть каждый элемент массива, чтобы найти наивысшую оценку. Если же массив отсортирован, то наивысшая оценка будет находиться либо на первой позиции, либо на последней (в зависимости от метода сортировки массива: в порядке возрастания или в порядке убывания), поэтому нам не нужно искать вообще!

Сортировка обычно выполняется путем повторного сравнения пар элементов массива и замены значений, если они отвечают заданным критериям. Порядок, в котором эти элементы сравниваются, зависит от того, какой алгоритм сортировки используется. Критерии определяют, как будет сортироваться массив (например, в порядке возрастания или в порядке убывания).

Чтобы поменять два элемента местами, мы можем использовать функцию std::swap() из Стандартной библиотеки C++, которая определена в заголовочном файле algorithm. В C++11 функция std::swap() была перенесена в заголовочный файл utility:

#include <iostream>

#include <algorithm> // для std::swap. В C++11 используйте заголовок <utility>

int main()

{

int a = 3;

int b = 5;

std::cout << "Before swap: a = " << a << ", b = " << b << '\n';

std::swap(a, b); // меняем местами значения переменных a и b

std::cout << "After swap: a = " << a << ", b = " << b << '\n';

}

1

2

3

4

5

6

7

8

9

10

11

#include <iostream>

#include <algorithm> // для std::swap. В C++11 используйте заголовок <utility>

int main()

{

int a = 3;

int b = 5;

std::cout << "Before swap: a = " << a << ", b = " << b << '\n';

std::swap(a, b); // меняем местами значения переменных a и b

std::cout << "After swap: a = " << a << ", b = " << b << '\n';

}

Результат выполнения программы:

Before swap: a = 3, b = 5

After swap: a = 5, b = 3

После выполнения операции замены значения переменных a и b поменялись местами.

4,4(28 оценок)
Ответ:
dim4ik10
dim4ik10
25.12.2021
Uses graph; var gd,gm,c,i:integer;     p:array[1..12] of Pointtype; begin gd:=detect; initgraph(gd,gm,''); setcolor(10); circle(340,105,50); Setfillstyle(1,10); fillellipse(340,105,50,50); setcolor(12); circle(290,170,50); Setfillstyle(1,12); fillellipse(290,170,50,50); setcolor(13); circle(390,190,50); Setfillstyle(1,13); fillellipse(390,190,50,50); p[1].x:=240;p[1].y:=190; p[2].x:=440;p[2].y:=190; p[3].x:=440;p[3].y:=240; p[4].x:=345;p[4].y:=265; p[5].x:=345;p[5].y:=365; p[6].x:=440;p[6].y:=390; p[7].x:=240;p[7].y:=390; p[8].x:=335;p[8].y:=365; p[9].x:=335;p[9].y:=265; p[10].x:=240;p[10].y:=240; p[11].x:=p[1].x;p[11].y:=p[1].y; setcolor(11); moveto(p[1].x,p[1].y); for i:=1 to 11 do lineto(p[i].x,p[i].y); Setfillstyle(1,11); fillpoly(11,p); readln end.
4,8(44 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ