1. O‘nlikdagi 211 sonini beshlikdagi yozuvidagi raqamlar ko‘paytmasini aniqlang

O`zbekiston madhiyasi

Ser quyosh hur o`lkam, elga baxt najot,

Sen o`zing do`stlarga yo`ldosh mehribon

Yashnagay to abad ilmu fan ijid

Shuxrating porlasin toki bor jahon.

3. Жавоб: 2, 8, 6, 7, 5,1, 4, 3

4. Var

N:integer;

K:real;

Begin

Write(‘N ni kiriting:’);

ReadLn(N);

If (N>0) And (N mod 5=0) Then

K:=sqrt(N)

Else K:=sqr(N);

WriteLn(‘Javob:’,K:0:3);

ReadLn;

End.

5. жадвал тузиб ўқувчилар баҳлолангандан кейин,

=ЕСЛИ(___<55; “қониқарсиз”; ЕСЛИ(___<71; “Қонқарли” ; ЕСЛИ(___<86 “яхши”; “аъло” )))

___< берилган натижа ячейкаси

Вопросы практических заданий 11 класса

1. Создайте в Delphi окно приложения 600 на 800, с зелёным фоном, и строкой в заголовке с именем “Informatika”.

2.Составьте веб-страну «Гимн Узбекистана»

Заголовок по центру синий цветом (шрифт 27) все буквы, 1 куплет гимна зеленый цветом полужирный видом.

3. Внизу приведена смешанная программа вычисления площади трапеции. Восстановите программу.

1)p:=(a+b)/2; s:=p*h;

2)program Ploshad_trapetsii;

3)end.

4)Writeln(‘S=’, s, ‘kv.yedinits’ );

5)Readln(a,b,h);

6) begin

7) write(‘Vvedite A, B, H : ‘);

8)Var a, b, h:Integer; p,s:Real;

4. Составить программу, которая выводить квадратные корень заданного число N, если число положительное и кратная к 5, в противном случае квадрат числа.

5. Составьте таблицу 5 предметам оценок 20 балловые системам учащихся. В итоге качества знания «Отлично», «Хорошо», «удовлетворительна» , «не удовлетворительна» образом выходить надо.

Ответы практических заданий

Ответ 1 Form1.Width:=800;

Form1.Height:=600;

Form1.Caption:=’Informatika’;

Color:=’ClGreen’;

Ответ 2