Font size
Worksheets98745612
Total questions: 98
Worksheet time: 49mins
Өрнекті есептеу кезіндегі оның нәтижесі
[5..9,17..20]*[8..18]-[8,9]
[17,18]
[5..9,19,20]
[5..9]
[7..9]
[15..20]
Төменде келтірілген айнымалылардың әртүрлі мәндері үшін қортындылау операторының барысындағы нәтижесі
…varCH:char; writeln(CH);
1. CH:= ‘A’; 2. Ch:=#65;
A A
’A’ 65
65 A
’A’ ’A’
A ’A’
Кетірілген программаның нәтижесі:
Program Par;
Var C,D: integer;
Procedure Q (x,y: integer);
Procedure P (x,y: integer);
Begin y:=x+1; end;
C:=2; D:=0; P(SQR)+C,D; writeln (D)
C:=2; D:=0; Q(SQR)+C,D; writeln (D) end
7 7
6 7
0
2 3
0 0
Книг К айнымалысына келесі информацияны меншіктеу керек:
Автор – Петров О.П.; кітаптың аты – Физика. Баспаның аты – Наука, баспадан шыққан жылы – 1975. Сонымен қатар, Книга 2 айнымалысына осындай информацияны меншіктеу керек. Тек баспаға шығатын жылын 1980 жылға ауыстыру керек TYPEКНИГА = RECORDАВТОР, НАЗВ. ИЗДАТ = STRING[20] ГОД ИЗДАН; 1960..1995 END; VARКНИГ1, КНИГ2: КНИГА;
WITH КНИГ1 DO BEGIN АВТОР:='ПЕТРОВ О.П.'; НАЗВ:='ФИЗИКА'; ИЗДАТ:='НАУКА'; ГОД_ИЗД:=1975; END;
WITH КНИГ1 DO BEGIN АВТОР:='ПЕТРОВ О.Н.'; НАЗВ:='ФИЗИКА'; ИЗДАТ:='НАУКА'; ГОД_ИЗД:=1975; END;
WITH КНИГ1 DO BEGIN АВТОР:='ПЕТРОВ О.Н.'; НАЗВ:='ФИЗИКА'; ИЗДАТ:='НАУКА'; ГОД_ИЗД:=1980; END;
WITH КНИГ1 DO BEGIN АВТОР:='ПЕТРОВ О.Н.'; НАЗВ:='ФИЗИКА'; ГОД_ИЗД:=1960; END;
WITH КНИГ1 DO BEGIN АВТОР:='ПЕТРОВ О.Н.'; НАЗВ:='ФИЗИКА'; ГОД_ИЗД:=1975; END;
Келесі есепті шешу үшін программаның дұрыс фрагментін таңда:
Бүтін сандадан тұратын f файлы берілген; 3-ке бөлінетін және 7-ге бөлінбейтін сандарды g файлына жазу керек
Reset (f); Rewrite (g); If (n mod 3=0) and (n mod 7<>0) Then write (g,n); End;
Reset (f); Rewrite (g); If (n / 3=0) and (n mod 7<>0) Then write (g,n); End;
Reset (f); Rewrite (g, n); If (n mod 3=0) and (n mod 7<>0) Then write (g); End;
Reset (f); Rewrite (g); While not eof (f) do Begin Read (f,k); if (n / 3=0) and (n mod 7<>0) write (g,n); End;
Reset (f); Rewrite (g); If (n div 3=0) and (n div 7<>0) Then write (g,n); End;
Фрагменттің дұрыс жазылуы
<Айнымалы>:=<өрнек>;
Меншіктеу операторы
Таңдау операторы
Шартты оператор
Қайталау операторы
Көшу опрерторы
Келесі өрнектің типтері мен мәнін анықта:
2*5+9DIV4*3+TRUNC(3.67).
19 (INTEGER);
19 (REAL);
16 (INTEGER);
20 (REAL);
20 (INTEGER).
Массивтің max элементін анықтайды
массивтің min элементін анықтайды
Массивтің элементтерінің қосындысын есептейді
Өсуі бойынша іріктейді
Кемуі бойынша іріктейді
