Forgotten password

Language

Bulgarian    English

Advertisements




Report a bug !
Add search function to you browser

Powered by PHP Powered by MySQL
Pascal емулатор
1 member(s) online
Size control Print  Language: Pascal

Examples://Code arrange


To solve the problem you should shift the code with your mouse to end up with working solution.

Problem:
Write down a program that initiates symbols until a point is initiated and the numberof the small Latin letters is defined


  • end.
  • var ch : char;
  • write('Enter symbol: ');
  • write('br= ', br)
  • repeat
  • br : byte;
  • until ch='.';
  • if (ch>'a') and (ch<'z') then br := br+1;
  • readln(ch);
  • br := 0;
  • begin