Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
юлд1
25.07.2022 12:45 •
Информатика
Написать программу,которая запрашивает возраст человека. если ему 18 и больше лет, то выводит сообщение совершеннолетний иначе - несовершеннолетний
👇
Увидеть ответ
Ответ:
Julianovikova6
25.07.2022
Program Program1;
var
A:Real;
Begin
readln(A);
if A>=18 then writeln('Совершеннолетний') else writeln('Несовершеннолетний');
End.
4,6
(56 оценок)
Открыть все ответы
Ответ:
Barvina779
25.07.2022
численность население через год 1 40000 42000 2 42000 44100 3 44100 46305 переменная 1 = 3 переменная 2 = 46305
4,5
(81 оценок)
Ответ:
Снежок74
25.07.2022
#include <iostream>
using namespace std;
int main()
{
int n,max, min, pos1, pos2, mem, sum;
cin >> n;
pos1 = 0;
pos2 = 0;
int *A = new int[n];
for (int i = 0; i < n; i++)
{
cin >> A[i];
}
min = A[0];
max = A[0];
for (int i = 0; i < n; i++)
{
if (A[i] > max)
{
max = A[i];
pos1 = i;
}
if (A[i] < min)
{
min = A[i];
pos2 = i;
}
}
if (pos2 > pos1)
{
mem = pos2;
pos2 = pos1;
pos1 = mem;
}
sum = 0;
for (pos2; pos2 <= pos1; pos2++)
{
sum = sum + A[pos2];
}
cout << sum;
system("pause");
return 0;
}
4,7
(72 оценок)
Это интересно:
К
Кулинария-и-гостеприимство
04.04.2021
Как правильно есть джикама: готовимся к встрече с экзотикой...
К
Компьютеры-и-электроника
19.12.2022
Как отключить автозагрузку приложений на Android...
П
Питомцы-и-животные
17.04.2023
Объемная кровать для собаки: сделай сам и порадуй своего питомца...
27.02.2021
Как изменить всю свою личность: советы от психологов...
С
Семейная-жизнь
23.06.2022
Как избежать рвоты беременных...
З
Здоровье
05.02.2021
Как избавиться от узлов в мышцах: причины, симптомы и методы лечения...
К
Кулинария-и-гостеприимство
08.09.2020
Секреты приготовления индийского чая, которые всегда работают...
П
Питомцы-и-животные
15.09.2020
Как определить гусеницу: основные признаки и виды...
11.11.2020
Основные принципы полезной агрессии: как стать более уверенным в себе...
29.07.2022
Как легко и просто найти общий язык с застенчивым парнем, которого вы почти не знаете...
Новые ответы от MOGZ: Информатика
ale2005171112
24.07.2022
Вms word набери слово принтер и сохрани его с названием word_2, указав тип файла word 97 - 2003 document (*.doc) запиши имя данного файла ,я это не понимаю...
AzNas
24.07.2022
Какие формулы должен знать человек,занимающий ремонтом квартир...
hhhhh7777
24.07.2022
1. назовите растровые графические редакторы 2. назовите векторные графические редакторы 3. вычислите объем файла, содержащего черно-белый рисунок, высотой … пикселей и шириной...
вика6010
09.12.2022
Алгоритм вычисления значений функций f(n) и g(n), где n – натуральное число, задан следующими соотношениями: f(1) = 1; g(1) = 1; f(n) = 2*f(n–1) – g(n–1), g(n) = 2*f(n–1)...
Данил30576
27.03.2020
Вкаждом пункте перечислены объекты, сгруппированные по классам. например: стол, компьютер, лук/корова, ручка, кастрюля/село,знамя,перо- существительные, классифицированные...
натага2
27.03.2020
Составьте программу, которая строит график зависимости: а) y(x)=0.5x *cos 2x на промежутке [-12; 12]; б) y(x)=8 sinx *sin 2x на промежутке [-15; 15];...
slavka194
22.04.2022
Сопоставьте html-тег с его описанием. ячейка таблицы заголовок элемент ненумерованного списка жирный шрифт перевод строки...
roma6279
16.08.2021
1) в каталоге находятся файлы со следующими именами: crab.txt crash.text cram.text chronos.txt traffic.txt ucraine.txt ucraine.tab определите, по какой из масок будет выбрана...
nevmer
01.01.2022
Алгоритм вычисления значения функции f(n), где n – натуральное число, задан следующими соотношениями: f(0) = 1, f(1) = 1 f(n) = f(n–1)*f(n-2)+2, при n 1 чему равно значение...
Nagachika
01.01.2022
Иесли 5 это о , 55 это д ,555 это т ,а 5555 это ч. что выдаст чёрный ящик если на вход подать 55555. у меня олимпиада я не...
MOGZ ответил
ответить на вопросы 1. Электродвигатели мехатронных модулей. 2. Определение...
Rose is one of the 1 beaukit it is symbol: ed as love it will make great...
Дано точки A(0;2;0) B(1;0;0) C(2;0;2) D(1;2;2) знайдіть площу чотирикутника...
решить задачу по механике 2 вариант...
Знайдіть |a| якщо a(-2;1;-3)...
1. anome peopoak Manunootpouren KOMINEKO padonas, Mapooranti veoma poekt...
В чем сходство восприятия революции у Гумилёва и Блока?...
Section F Read the information about three hotels, and answer the questions....
построить Блок-схему: Алгоритм информационного обмена в сети LTE (очень...
Найдите угол между векторами AB и AC, если: A(-2;3;5), B(1;4;-3), C(1;7;2)...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
var
A:Real;
Begin
readln(A);
if A>=18 then writeln('Совершеннолетний') else writeln('Несовершеннолетний');
End.