ВАШЕ СВИДЕТЕЛЬСТВО
О ПУБЛИКАЦИИ В СМИ И РЕЦЕНЗИЯ
бесплатно за 1 минуту
Добавить материал
Количество Ваших материалов: 0.
Авторское
свидетельство о публикации в СМИ
добавьте 1 материал
Свидетельство
о создании электронного портфолио
добавьте 5 материала
Секретный
подарок
добавьте 10 материалов
Грамота за
информатизацию образования
добавьте 12 материалов
Рецензия
на любой материал бесплатно
добавьте 15 материалов
Благодарность образовательного СМИ
за внедрение творческих и прогрессивных педаг. идей
добавьте 20 материалов
Сертификат
почетного автора образовательных и методических публикаций
добавьте 30 материалов
Почётная грамота
педагог. мастерства
за вклад в развитие образов. интернет-пространства
добавьте 40 материалов
Золотая карта
1000 руб. в год
в качестве скидки до 50% на все услуги
добавьте 50 материалов
Большой набор
для быстрого создания презентаций
добавьте 75 материалов
Мейрамгул Байболова Свидетельство о публикации Рецензия
Свидетельство Скачивание доступно только автору
ОЛИМПИЯДА ЕСЕПТЕР ЖИНАҒЫ

ОЛИМПИЯДА ЕСЕПТЕР ЖИНАҒЫ

№1 Екі санның қосындасын табу программасын құру керек. Program kosindi; Var a, b, x integer; Begin Write (‘a, b-сандарын енгіз'); Readln(a, b); X:=a+b; Writeln(‘x =’,x); End. №2 Екі санның бөліндісін табу программасын құру керек. Program bolindi; Var a, b, x:real; Begin Write (‘a, b-сандарын енгіз'); Readln(a, b); X:=a/b; Writeln(‘x=’,x); End. №3 Екі санның қосындысының квадраттарын және көбейтіндісін табу программасын құру керек. х = (a+ b) , у = a* b Program esep 1; Var a, b, x, y:integer; Begin Write (‘a. b- сандарын енгіз’); Readln (a, b); X:=sqr (a+b); Y:= a*b; Writeln (‘x=’, x); Writeln (‘y=’, y); End. №4. k =(x2 + y2) * x+y, мұндағы функциясының мәнін есептейтін программа құру керек. Program esep 2 ; Var k:real; Const x = 5, y = 2.8; Begin K: = srq (x) + sqr(y)* sqrt (x+y); Writeln (‘k = ‘, k); End. №5. Апта күндерінің реттік нөмірі бойынша олардың аттарын анықтайтын программа құру керек. Program kyn; Var kyn: integer ; Begin Write (‘ kynnin aptadagi rettik nomirin engizinder: ‘ ); Readln (kyn); Case kyn of 1: writeln ( ‘ duisenbi’); 2: writeln ( ‘seisenbi’); 3: writeln ( ‘ sarsenbi’); 4: writeln ( ‘ beisenbi’); 5: writeln ( ‘ juma’); 6: writeln ( ‘senbi’); 7: writeln ( ‘ jeksenbi’); Else writeln ( ‘ 1… 7 araligindagi sandardi engizinder’); End

  • Научные работы
  • Информатика
  • 9 кл.
№1 Екі санның қосындасын табу программасын құру керек. Program kosindi; Var a, b, x integer; Begin Write (‘a, b-сандарын енгіз'); Readln(a, b); X:=a+b; Writeln(‘x =’,x); End. №2 Екі санның бөліндісін табу программасын құру керек. Program bolindi; Var a, b, x:real; Begin Write (‘a, b-сандарын енгіз'); Readln(a, b); X:=a/b; Writeln(‘x=’,x); End. №3 Екі санның қосындысының квадраттарын және көбейтіндісін табу программасын құру керек. х = (a+ b) , у = a* b Program esep 1; Var a, b, x, y:integer; Begin Write (‘a. b- сандарын енгіз’); Readln (a, b); X:=sqr (a+b); Y:= a*b; Writeln (‘x=’, x); Writeln (‘y=’, y); End. №4. k =(x2 + y2) * x+y, мұндағы функциясының мәнін есептейтін программа құру керек. Program esep 2 ; Var k:real; Const x = 5, y = 2.8; Begin K: = srq (x) + sqr(y)* sqrt (x+y); Writeln (‘k = ‘, k); End. №5. Апта күндерінің реттік нөмірі бойынша олардың аттарын анықтайтын программа құру керек. Program kyn; Var kyn: integer ; Begin Write (‘ kynnin aptadagi rettik nomirin engizinder: ‘ ); Readln (kyn); Case kyn of 1: writeln ( ‘ duisenbi’); 2: writeln ( ‘seisenbi’); 3: writeln ( ‘ sarsenbi’); 4: writeln ( ‘ beisenbi’); 5: writeln ( ‘ juma’); 6: writeln ( ‘senbi’); 7: writeln ( ‘ jeksenbi’); Else writeln ( ‘ 1… 7 araligindagi sandardi engizinder’); End
Медианары для учителей с выдачей свидетельства

Все файлы материала: