제발 프로그램 도움이 필요하십니까 쓰기 2는 C

[Guest]

1) 사각형의 크기를 읽고 쓰기에서 프로그램을 누른 다음 여백의 별표 및 밖으로 그 크기 지문의 빈 사각형.제 프로그램은 20과 1 사이의 크기의 모든 측면 사각형해야 작동합니다.예를 들어, 5면의 크기가 읽는 프로그램, 그것은 인쇄해야합니다
*****
* *
* *
* *
*****2) palindrome의 작성에서 프로그램을 읽습니다 5가 자리하고 정수 여부를 결정합니다.(힌트를 사용하여 부문과 계수 사업자) 자릿수의 개인 전화 번호를 별도로

 

[RBB]

숙제를 해 자신의.

 

[Guest]

만약 내가 알고 u 아닐거야 내가 그것을 수행하는 방법 부탁 안 것 같아요

 

[RBB]

아마 당신이 질문을 물어 봐야 구체적인 노력을 그때 처음으로 &.

 

[Nephazz]

아니면 나 지불해야합니다.(사전에서)

 

[Guest]

[No message]

 

[FG]

해봐 C를 변환이로, 괜찮아 작동합니다.

코드 :

프로그램 하나;사용

브라운관;var에

나, s의 : 바이트;시작

쓰기 ( '크기 ='); Readln (들);

((들 = 0) 또는 (들 경우> 20)) 후 정지;

난 용 : = 1) s로 작성해 ('*');{ 가기 측면을 할

Writeln;

난 용 : = 1 (들 - 2)부터 시작 할까?

쓰기 ('*');{)은 왼쪽

GotoXY (WhereX (들 - 2), WhereY); (대신에 커서를 이동하는 우리

또한) - 2 s의 공백을 여기에 인쇄할 수 있습니다

Writeln ('*'){ 오른쪽)

끝;

난 용 : = 1) s로 작성해 ('*');{ 바닥 쪽을

Writeln

끝.{..........}프로그램 2;const

b : 부울 = true로;var에

나 : LongInt;

일본 : 바이트;

바이트의 s의 : 배열 [0 .. 4];시작

쓰기 ( '?'); Readln은 (i);

은 (i <0) 그럼 : = - i를하는 경우;

(은 (i <10000) 또는 (i> 99999)) 후 정지하는 경우;

은 J : = 0 4로 시작 할까?

s의 [일본] : = 난 모드 10;

나 : = 전 사업부 10

끝;

은 J : = 0 1 b : = B와 (들은 [일본]은 =이들 [4 - j를]);

쓰기 ( '입력하신 번호입니다');

(않을 경우 b)는 다음 쓰기 ( '안');

Writeln ( 'palindrome.)

끝.