1樓：匿名使用者
頂樓的程式寫得有點長。
我的程式如下：
const p:array [0..11] of integer=(0,31,59,90,120,151,181,212,243,273,304,334);
var a,b,c,t:integer;
beginread(a,b,c);
if (a mod 400=0) or ((a mod 4=0) and (a mod 100<>0)) then
if b>2 then t:=p[b-1]+c+1 else t:=p[b-1]+c else t:=p[b-1]+c;
writeln(t);
end.
2樓：怪物獵人
先設月份，再直接求，源**樓上的寫得稍有些長。
pascal語言的基本知識的常量與變數
3樓：專屬nnn丶
常量(1)常量：在某個程式的整個過程中其值不變的量。
2)常量定義：常量定義出現在說明部分。它的語法格式是：
const常量識別符號》=《常量》;
常量識別符號》=《常量》;
常量表識符的型別由定義它的常量的型別決定。例如：const a=12 隱含說明a是整型；const r= 隱含說明r是實型。
3)常量定義部分必須以保留字const開頭，可以包含一個或幾個常量定義，而且每個常量均以分號結束。
4)turbo pascal型別常量。
型別常量，又稱變數常數，它是turbo pascal的一個擴充特性。型別常量的定義與標準pascal規定的常數定義和變數說明有所區別。型別常量定義的語法格式：
const簡單型別常量識別符號》:簡單型別=常數；
例如：[copy to clipboard]
code:const
counter:integer=0;
flag:boolean=true;
index:0..100=0;
變數(1)變數：在某個程式中的執行過程中其值可以發生改變的量。
2)變數說明：變臉說明出現在說明部分。它的語法格式是：
var《變數識別符號列表》:《型別》;
.《變數識別符號列表》:《型別》;
其中，保留字var表示開始一個變數說明部分。變數識別符號列表是一個用逗號隔開的識別符號序列，冒號後面的型別是型別識別符號。每個變數說明均以分號結束。
例如：[copy to clipboard]
code:vara,b,c:integer;
m,n:real;
pascal語言的基本知識的運算子表示式
4樓：網友
運算子和優先順序。
1)運算子。
a.算術運算子 運算子。
運算運算物件。
結果型別+加。
整型、實型。
只要有一個運算物件是實型，結果就是實型，如果全部的運算物件都是整型並且運算不是除法，則結果為整型，若運算是除法，則結果是實型-減。
整型、實型*乘。
整型、實型/除。
整型、實型。
div整除。
整型整型。mod取餘。
整型整型。b.邏輯運算子。
運算子運算。
運算物件。結果型別。
not邏輯非。
布林型布林型。
and邏輯與。
布林型布林型。
or邏輯或。
布林型布林型。
xor邏輯異或。
布林型布林型。
c.關係運算子。
運算子運算。
運算物件。結果型別=等於。
簡單型別。布林型<>
不等於簡單型別。
布林型<
小於簡單型別。
布林型》大於簡單型別。
布林型<=
小於等於。簡單型別。
布林型》=大於等於。
簡單型別。布林型(2)優先順序。
運算子優先順序。
not1(高）,/div,mod,and
2xor,+,or
3in,=,4（低）表示式(1)算術表示式：算術表示式是由算術運算子連線常量、變數、函式的式子。算術表示式中各個運算子的次序為： (函式-->div,mod-->1
2)布林表示式：turbo pascal提供給布林表示式以下基本操作：邏輯運算和關係運算。
pascal程式設計的語言，Pascal語言是什麼？
program 程式 const 常量 type 型別 var 變數 function 函式 procedure 過程 begin 開始 end 結束 if 如果 then 那麼 else 否則 case of 分支 for to do 計數迴圈 while 當迴圈 repeat 迴圈 until ...
pascal常見問題，關於Pascal語言問題 完整的
第一題是百錢百雞問題拓展，屬於列舉問題 program p1 vara,b,c integer begin for a 1 to 35 do for b 1 to 50 do begin c 90 a b if a 15 b 10 c 5 500 thenwriteln a,b,c end end....
pascal教程，怎麼使用pascal
第一節 pascal語言的特點。資訊學奧林匹克競賽是一項益智性的競賽活動，核心是考查參賽選手的智力和使用計算機程式設計解題的能力。資訊學奧林匹克競賽要求參賽選手有如下能力 針對競賽題目中的要求構建數學模型，構造出有效的演算法和選用相應的資料結構，寫出高階語言程式，上機除錯通過。程式設計是資訊學奧林匹...