1.Вычислить значение переменной Y при заданном значении N: Y=1/1+1/2+1/3+ ... + 1/N. использовать цикл типа ДО. (Паскаль) 2. Найти все
5-9 класс
|
целые двузначные числа, удовлетворящие условию: остаток от деления на 3 равен 2. (Паскаль)
1).Использовал цикл,но условия не до конца понял
program c1;
var n,i:integer;
y,l:real;
begin
l:=1;
readln(n);
for i:=1 to n do
begin
y:=y+(1/l);
l:=l+1;
writeln(y);
end;
end.
2).
program c1;
var n,i:integer;
begin
readln(n);
for i:=1 to n do
begin
if (i mod 3=2) then write(i,' ');
end;
end.
Другие вопросы из категории
Какое количество информации содержит фраза: Персональный компьютер
Читайте также
3) тип алгоритма
4) тип переменной
5) не изменяет ничего
A02:
Переменная в программировании считается полностью заданной, если известны ее:
1) тип, имя
2) имя, значение
3) тип, значение
4) значение
5) тип, имя, значение
A03:
Чему будут равны значения переменных X, Y и Z после выполнения фрагмента программы на Паскале?
X := 5; Y:= 3; Z := X*Y; Y: = Y–X; X := X+ Y; Z := 4*Z+X
1) X = 5; Y = 3; Z = 12
2) X = 3; Y = –2; Z = –12
3) X = 3; Y = –2; Z = –63
4) X = 3; Y = –2; Z = 63
5) X = 5; Y = 3; Z = 15
A04:
Выбрать оператор присваивания с ошибкой: 1) SKOLA:=A/B 2) FF3A:=3*B/C+D 3) X:=(Y+1)(X+1) 4) M:=((2+2))–5 5) K54:=D9876A05:
Выбрать арифметическое выражение, соответствующее формуле
1) X/(A*B)+Y*B/A
2) X/A*(B+Y)*B/A3) X/A*(B+Y*B/A)
4) X/(A*B)+(Y*B)/A
5) X/A*B+Y*B/AA06:
Выбрать последовательность команд, меняющих местами две величины X и Y.
1) X := Y; Y := X
2) X := A; X := Y; A := Y
3) X := Y
4) A := X; X := Y; Y := A
5) X := A; Y := X; A := Y
A07:
Чему будет равно значение переменной S после выполнения фрагмента программы на Паскале?
A := 2; B := 3;
IF A<B THEN S:=A*B ELSE S:=A+B;
WRITE (S);
1) 2
2) 6
3) 5
4) 3
5) 11
A08:
Выбрать фрагмент программы на Паскале, в котором переменной Y присваивается значение, равное 0, если –5 < X <5. в противном случае переменной Y присваивается значение, равное 1.
1) Y := 1; IF X > –5 ТHEN IF X < 5 THEN Y := 0;
2) IF X > –5 ТHEN IF X < 5 THEN Y := 0 ELSE Y := 1;
3) IF X < –5 ТHEN IF X > 5 THEN Y := 1 ELSE Y := 0;
4) IF X > –5 ТHEN IF X < 5 THEN Y := 0; Y := 1;
5) IF X > –5 ТHEN Y := 0 ELSE Y := 1; IF X < 5 THEN Y := 1;
A09:
Чему будет равно значения переменной S после выполнения фрагмента программы на Паскале?
S := 0; i := 0;
WHILE i<3 DO
BEGIN
i := i + 1;
S := S + i*i;
END;
1) S = 0
2) S = 6
3) S = 10
4) S = 14
5) S = 18
A10:
Какое значение нужно ввести при исполнении программы, чтобы в результате было выведено значение 128?
var i,n,p : integer;
begin write ('Введите n ');
readln (n);
p:=1;
for i:=0 to n do
p:=p*2;
write (p);
end.
1) n = 6
2) n = 8
3) n = 16
4) n = 32
5) n = 64
A11:
Чему будет равно значения переменной S после выполнения фрагмента программы на Паскале?
a := 1; b := 1;
WHILE a+b<10 DO
BEGIN
a := a + 1;
b := b + a;
END;
s := a + b;
1) S = 0
2) S = 6
3) S = 10
4) S = 14
5) S = 18
A12:
Чему будут равны значения переменных S и i после выполнения фрагмента программы на Паскале?
S := 0; i := –2;
WHILE i < 2 DO
BEGIN
i := i+1;
IF i:=0 THEN А:=1 ELSE A:=1/ i;
S:=S+A;
END;
1) S = 1.5; i = 2
2) S = 1; i = 2
3) S = 0.5; i = 2
4) S = 1; i = 1
5) S = 0.5; i = 1
A13:
Чему будет равно значения переменной S после выполнения фрагмента программы на Паскале?
S := 128;
FOR i := 1 TO 4 DO S := S – 3;
1) S = 112
2) S = 116
3) S = 124
4) S = 16
5) S = 125
A14:
Чему будет равно значения переменной d после выполнения фрагмента программы на Паскале?
var x,y,d : integer;
begin x:=5; y:=2;
if (y>x+2) or (y>0)
then d:=x+2
else d:=y-x;
write(d);
d:=10;
end.
1) d = 2
2) d = 3
3) d = 5
4) d = 7
5) d = 10
A15:
Чему будет равно значения переменной S после выполнения фрагмента программы на Паскале?
FOR i := 1 TO 3 DO
BEGIN
S := 0;
FOR j := 2 TO 2 DO
S := i + j;
END;
1) S = 0
2) S = 6
3) S = 5
4) S = 12
5) S = 10
A16:
Чему будут равны значения переменных S и i после выполнения алгоритма?
S := 0; i := –3;
ПОКА i < 2 ПОВТОРЯТЬ
ЕСЛИ i < 0 ТО А := i * i ИНАЧЕ А := i – 1 КОНЕЦ ВЕТВЛЕНИЯ
S := S + А;
i := i + 1;
КОНЕЦ ЦИКЛА
1) S = 1; i = 1
2) S = 13; i = 2
3) S = 14; i = 2
4) S = 2; i = 2
5) S = 13; i = 1
A17:
Выбрать фрагмент алгоритма, позволяющий найти максимальное из трех чисел x, y, z.
1) ЕСЛИ x > y ТО b := x КОНЕЦ ВЕТВЛЕНИЯ b := y ЕСЛИ b < z ТО b := z КОНЕЦ ВЕТВЛЕНИЯ
2) ЕСЛИ x > y ТО b := x ИНАЧЕ b := y КОНЕЦ ВЕТВЛЕНИЯ ЕСЛИ b > z ТО b := z КОНЕЦ ВЕТВЛЕНИЯ
3) ЕСЛИ x > y ТО b := x ЕСЛИ b < z ТО b := z ИНАЧЕ b := y КОНЕЦ ВЕТВЛЕНИЯ КОНЕЦ ВЕТВЛЕНИЯ
4) ЕСЛИ x > y ТО b := x ИНАЧЕ ЕСЛИ b < z ТО b := z ИНАЧЕ b := y КОНЕЦ ВЕТВЛЕНИЯ КОНЕЦ ВЕТВЛЕНИЯ
5) ЕСЛИ x > y ТО b := x ИНАЧЕ b := y КОНЕЦ ВЕТВЛЕНИЯ ЕСЛИ b < z ТО b := z КОНЕЦ ВЕТВЛЕНИЯ
A18:
Чему будет равно значения переменной Y после выполнения программы на Паскале, если было введено 4?
var X, Y: integer;
begin
read (X);
X:=X*10;
if X>40 then Y:=X+5
else if X=40 then Y:=X*5
else begin Y:=X+10; Y:=Y*2 end;
write (Y);
end.
1) Y = 40
2) Y = 45
3) Y = 50
4) Y = 100
5) Y = 200
схеме, чтобы в переменной а оказалось первоначальное значение переменной с, в переменной b – значение а, в переменной с – значение b.(Пояснение: Используйте оператор присваивания и одну дополнительную переменную)
2.вычислите значение логического выражения при всех возможных значениях логических величин A и B; не(не A или не B) или A
3.вычислите значение логического выражения при всех возможных значениях логических величин A,B и C не(A или B и C) или A
4.вычислите значение логического выражения при всех возможных значениях логических величин A и B; B или не A и не B.
«итог. сумма».
Задание 2.
Переменной Х присвоить значение 7. Переменной Р присвоить значение, равное квадрату Х. Вывести значения переменных Х и Р (через запятую). Значение Х увеличить на Х. Переменной Р присвоить значение, равное корню квадратному из Х. Вывести значения переменных Х и Р (через запятую).DIKTANT 2
Задание 1.
Значение переменной Х присвоить в программе. При неотрицательном значении Х переменной У присвоить значение, равное корню квадратному из Х. В противном случае, переменной У присвоить значение, равное квадрату Х. Вывести на экран значение Х и значение У.Задание 2.
Двум произвольным переменным присвоить произвольным образом соответственно 2 числа. Двум другим переменным присвоить значения, равные тангенсам двух предыдущих переменных. Вывести на экран значения всех переменных, а так же сумму значений двух последних переменных. помогите сделать пож