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бет
Шапшаң сөзжұмбақ. ДК «Шапшаң
сөзжұмбақ » файл ашыңыз жауабын
беріңіз.
Символдык шамалар есептер шығару.pptx
