Паскаль 9.1. запросить у пользователя день, месяц и год. вывести на экран: если день от 1 до 5, то вывести «начало», если от 6 до 14, то вывести «первая половина», если 15, то вывести «середина», если от 16 до 25, то вывести «вторая половина», если от 26 до 31, то вывести «конец». в той же строке вывести название месяца в родительном падеже. проверить и на другой строке вывести «високосный» или «невисокосный» год. 9.2. запросить у пользователя целое число, последнюю цифру дописать впереди числа, вывести результат на экран.
255
431
Ответы на вопрос:
Uses crt; var dd,mm,gg: integer; begin readln(dd,mm,gg); case dd of 1..5: writeln('начало'); 6..14: writeln('первая половина'); 15: writeln('середина'); 16..25: writeln('вторая половина'); 26..31: writeln('конец'); end; case mm of 1: writeln('января'); 2: writeln('февраля'); 3: writeln('марта'); 4: writeln('апреля'); 5: writeln('мая'); 6: writeln('июня'); 7: writeln('июля'); 8: writeln('августа'); 9: writeln('сентября'); 10: writeln('октября'); 11: writeln('ноября'); 12: writeln('декабря'); end; if gg mod 4=0 then writeln ('високосный') else writeln('не високосный'); end. var a: integer; begin readln(a); writeln(a mod 10,a); end.
Возить людей-машины велосипеды автобусы трамваи лошади и т.д. летать- вертолёты самолёты птицы и т.д. играть- люди животные
Популярно: Информатика
-
uliiashurinova03.06.2023 00:04
-
sarah20568126.10.2022 09:11
-
LediLizonka02.09.2022 08:59
-
таир2012.01.2022 11:54
-
nnfilinaaaa12.02.2022 05:04
-
Машенька787819.01.2021 21:08
-
AngelDarkness12303.05.2022 17:08
-
litoshikmari15.09.2021 11:52
-
BusL8104.07.2020 20:28
-
anuaribragimov130.11.2021 04:11