Readln, writeln операторларына слайд

29.10.14ж. Символдық және жолдық шамалар. Есептер шығару. «Char» тобына №1 есеп «String» тобына №1 есеп S:=’Сканер’;  D:=length(S);  Writeln (D);  үзіндісінде қандай жауап  шығады толықтырып  программа құрыңыз S1:=’ти’;  S2:=’кар’;  S3:=’на’;  S:=Concat(S2,S1,S3);  Writeln (S);   үзіндісінде қандай жауап  шығады толықтырып  программа құрыңыз

«Char» тобына №2 есеп «String» тобына №2 есеп S:=’Конфигурация’;  S:=Copy(S,4,6);  Writeln (S);    Экранға «фигура» сөзі шығады.  Дәлелдеп компьютерге  программасын құрыңыз.  S1:=’Картридж’;  S2:=’р’;  d:=pos(s2,s1);  Writeln (d);  Экранда «3» шығады. Дәлелдеп  компьютерге программасын құрыңыз.

«Char» тобына №3 есеп. Программа орындалуын түсіндіріңіз. PROGRAM prog3; VAR s: STRING; i: INTEGER; BEGIN write(сөз енгізу: '); readln(s); write(символ номерін енгізу: '); readln(i); writeln(i, '–ші символ қатар – ', s[i]); END. Сөз енгізу мектеп Символ номерін енгізу 4 4-ші символ қатар т «String» тобына №3есеп. Программа орындалуын түсіндіріңіз.   PROGRAM prog3; VAR s: STRING; BEGIN write(‘сөз енгізу: '); readln(s); writeln(‘сөз ұзындығы – ', ORD(s[0]), ' символ'); END. Сөз енгізу Мектеп Сөз ұзындығы 6 символ

Оқулық 102бет№3 «Char» тобына  Оқулық 102 бет №4 «String» тобына var t,y:string;     i,k:integer;     begin     readln(t);     for i:=1 to length(t)­1 do     begin      y:=copy(t,i,2);      if y='па'  then k:=k+1;      end;     writeln('k=',k);     end.

Жұмыс үстелінде  «Тест символдық шама» файлы бар Бес нұсқадан тұрады. Әр оқушы бір нұсқаға жауап беру керек.  Неше алғандарыңызды мұғалімге айтыңыз.

Үйге §9,10 оқу Оқулық №5 102бет Шапшаң сөзжұмбақ. ДК «Шапшаң  сөзжұмбақ » файл ашыңыз жауабын  беріңіз.