Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
oxpoluhina2017
03.06.2022 09:44 •
Информатика
Написать программу, которая считывает три числа день, месяц и год, и выводит дату следующего дня. високосный год не учитывать. программа c++
👇
Увидеть ответ
Ответ:
RIF12
03.06.2022
#include <iostream>
int main()
{
float x, y, z;
setlocale (LC_ALL, "Russian");
std::cout << "Введите день: ";
std::cin >> x;
std::cout << "Введите месяц: ";
std::cin >> y;
std::cout << "Введите год: ";
std::cin >> z;
std::cout << "Следующий день: " << x+1 << "." << y << "." << z << std::endl;
system("pause");
}
4,8
(13 оценок)
Открыть все ответы
Ответ:
илья33567б0
03.06.2022
Результат работы и листинг программы в приложениях.
Написано в PascalABC.NET но должно работать во всех Паскалях.
----------------------------
PROGRAM A20;
CONST
max = 100;
TYPE
matrix = array[1..max,1..max]of shortint;
VAR
ar:matrix;
num:byte;
i,j:byte;
a,b,c:byte;
q:boolean;
BEGIN
repeat
// num := 5;
write('Введите размер матрицы n=');
readln(num);
for i:=1 to num do begin
for j:=1 to num do
read(ar[i,j]);
end;
i:=1;//диагональ
q:=true;
while q and (i<num) do begin
j:= i+1;//колонка и ряд
while q and (j<=num) do begin
a := ar[j,i];
b := ar[i, j];
if (ar[j,i] <> ar[i, j])
then q:=false;
j:=j+1;
end;
i:=i+1;
end;
if q then
writeln('YES')
else
writeln('NO');
write('Введите 1 чтобы продолжить. 0 чтобы завершить');
readln(i)
until(i=0);
END.
4,5
(80 оценок)
Ответ:
yananesteshl
03.06.2022
Результат работы и листинг программы в приложениях.
Написано в PascalABC.NET но должно работать во всех Паскалях.
----------------------------
PROGRAM A20;
CONST
max = 100;
TYPE
matrix = array[1..max,1..max]of shortint;
VAR
ar:matrix;
num:byte;
i,j:byte;
a,b,c:byte;
q:boolean;
BEGIN
repeat
// num := 5;
write('Введите размер матрицы n=');
readln(num);
for i:=1 to num do begin
for j:=1 to num do
read(ar[i,j]);
end;
i:=1;//диагональ
q:=true;
while q and (i<num) do begin
j:= i+1;//колонка и ряд
while q and (j<=num) do begin
a := ar[j,i];
b := ar[i, j];
if (ar[j,i] <> ar[i, j])
then q:=false;
j:=j+1;
end;
i:=i+1;
end;
if q then
writeln('YES')
else
writeln('NO');
write('Введите 1 чтобы продолжить. 0 чтобы завершить');
readln(i)
until(i=0);
END.
4,6
(50 оценок)
Это интересно:
К
Кулинария-и-гостеприимство
21.10.2022
Лучший способ приготовления традиционных макарон с сыром...
С
Стиль-и-уход-за-собой
05.07.2020
Хна для волос: как правильно сочетать и наносить?...
З
Здоровье
25.04.2020
Как вывести токсины из легких с помощью натуральных средств...
С
Стиль-и-уход-за-собой
25.06.2021
Как наносить тональную крем-пудру: лучшие способы...
К
Кулинария-и-гостеприимство
19.02.2020
Как приготовить сливочную яичницу болтунью...
В
Взаимоотношения
04.01.2023
Как правильно вести себя, когда ваш парень целует вас в присутствии друзей...
К
Компьютеры-и-электроника
06.07.2020
Как сохранить форматирование документа при его копировании и вставке...
З
Здоровье
27.10.2022
Конъюктивит: быстрый и эффективный способ избавиться от болезни...
Т
Транспорт
07.05.2022
Как управлять автомобилем в зимнюю погоду: советы и рекомендации...
К
Кулинария-и-гостеприимство
13.05.2022
Как приготовить шоколадный торт в скороварке - быстро и вкусно...
Новые ответы от MOGZ: Информатика
OlessyaBaeva
27.03.2022
написать код Pydroid 3 на черепаху на андроид...
Еля24
27.11.2021
Запишите команду которая задает название игрового окна информатика 9 класс...
ПАРРА
12.02.2020
Составьте уравнения в excel (формула) №59...
shenikov2003
17.01.2022
Заполнить произвольный массив размером nxn (n 10) по следующему правилу: 14441 11411 11111 11411 14441 буду : )...
wwwlavor
12.03.2022
Написать программу Паскаль по блок схеме...
polatovskiy2002
12.11.2021
9. Какие из перечисленных высказываний являются ложными? а) принтер является устройством ввода информации. б)все повествовательные предложения являются высказываниями в) Объектами...
reginasachtova
04.03.2021
10. Конъюнкция - это... а) логическая операция, которая объединяет два высказывания в одно новое, которое будет являться истинным тогда и только тогда, когда оба исходных...
marialkahelp
06.06.2021
АЙТЫЛЫМ 3-тапсырма. Жұптық жұмыс. Сұрақтарды пайдаланып, диалог құрыңдар. ...
alinaskinAS
06.06.2021
Я приоткрою вам, мои друзья, дверь мудрости народной: вдохновение приходит во время труда. А. Выпишите из предложения слово, правописание приставки в котором определяется...
Дря
13.11.2020
4.Установите соответствие между названнем н классом органического вещества: Класс соединення Название вещества Бутилен А. Спирт Б. АЛКан 2. Бензот В. Днен 3. Пентантриол -1,3,5...
MOGZ ответил
В чем различия Революционного этюда Ф.Шопена и этюда Метель Ф.Листа...
Указать область значений функции у = - х ^ 2 + 2х - 3...
Заполнить таблицу Передвижение веществ у высших растений 1. Проводящие...
В повести приведены различные оценки Ивана Флягина. Вспомните, кому они...
Чем занимались волонтеры в блокады Ленинграда...
Стоит ноябрь на дворе ,в поле гудит ветер .на березе и осене нет больше...
Чем отличается Туровское княжество от Полоцкого княжества...
1.Подчеркните правильную характеристику звуков. Лаял Звук [л] - гласный,...
Нада чем сможете тем паможете буду благадарна ♥️...
Какие страны и народы упоминал чаадаев в своем письме...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
int main()
{
float x, y, z;
setlocale (LC_ALL, "Russian");
std::cout << "Введите день: ";
std::cin >> x;
std::cout << "Введите месяц: ";
std::cin >> y;
std::cout << "Введите год: ";
std::cin >> z;
std::cout << "Следующий день: " << x+1 << "." << y << "." << z << std::endl;
system("pause");
}