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

Разработки уроков
pptx
28.04.2017

Публикация педагогических разработок

Бесплатное участие. Свидетельство автора сразу.
Мгновенные 10 документов в портфолио.

Добавить материал

Сабақтың тақырыбы: Read , Readln,Write, Writeln операторлары Сабақтың мақсаты: А) бiлiмдiлiк: оқушыларды Паскаль тілінде сызықтық алгоритмдерді бағдарламалар құруға үйрету. Ә) дамытушылық: балалардың Паскаль тіліндегі білімдері мен дағдыларын, сызықтық бағдарлама туралы түсініктерін дамыту. Б) тәрбиелiк: оқушыларды еңбексүйгіштікке, сауатты азамат болуға тәрбиелеу. Сабақтың көрнектілігі: Презентациялық бағдарлама, Паскаль программалау бағдарламасы Сабақтың түрі: Аралас, интерактивті сабақ

Публикация является частью публикации:

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

Символдык шамалар есептер шығару.pptx

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

Материалы на данной страницы взяты из открытых источников либо размещены пользователем в соответствии с договором-офертой сайта. Вы можете сообщить о нарушении.

Посмотрите также