Pascal ABC
Код:
var
a: array [1..3] of string;
i, j, k: integer;
begin
readln(a[1],a[2],a[3]);
for i := 1 to 3 do
for j := 1 to 3 do
for k := 1 to 3 do
if (i <> j) and (i <> k) and (j <> k) then
writeln(a[i], ' ', a[j], ' ', a[k]);
end.
Пример работы:
Ввод:
КРАСНЫЕ
ЛАНДЫШИ
ЦВЕТУТ
Вывод:
КРАСНЫЕ ЛАНДЫШИ ЦВЕТУТ
КРАСНЫЕ ЦВЕТУТ ЛАНДЫШИ
ЛАНДЫШИ КРАСНЫЕ ЦВЕТУТ
ЛАНДЫШИ ЦВЕТУТ КРАСНЫЕ
ЦВЕТУТ КРАСНЫЕ ЛАНДЫШИ
ЦВЕТУТ ЛАНДЫШИ КРАСНЫЕ
Короче, с выводом не очень понял, поэтому будет 4 варианта, выбери сам
Обязательная часть программы:
import datetime
year, month, day = int(input('Введите год: ')), int(input('Введите месяц: ')), int(input('Введите день: '))
date = datetime.date(year, month, day)
delta = datetime.timedelta(days=1)
date = str(date + delta).split('-')[::-1]
Тут нужно выбрать одну из строк, будем рассматривать на примере 31 декабря 2019 года(то, что стоит после решетки и саму решетку не копируй:
Вариант 1:
print(*date) # 01 01 2020 --- это вывод(обычный)
Вариант 2:
print(int(date[0]), int(date[1]), date[2]) # 1 1 2020 (без ведущих нулей)
Вариант 3:
print(str(int(date[0])) + str(int(date[1])), date[2]) #11 2020(без нулей и пробелов)
Вариант 4:
print(str(date[0]) + str(date[1]), date[2]) # 0101 2020(без пробелов)
