1.
В какой строке допущена ошибка?
var i, s;
begin
s := 0;
for i: = 1 to 7 do
begin
s := s + s*i;
end;
end;
А: for i: = 1 to 7 do
Б: s := 0;
В: var i, s;
Г: s := s + s*i;
Выберите один правильный ответ (максимум )
2.
Чему будет ровняться значение переменной s?
var i, s: integer;
begin
s := 0;
for i: = 1 to 3 do
begin
s := s + i;
end;
end;
А: 6
Б: 8
В: 5
Г: 7
Выберите один правильный ответ (максимум )
3.
Чему будет равно значение переменной s?
var i, s, p: integer;
begin
s := 0;
p := 2;
for i: = 1 to 3 do
begin
s := s + i + p;
p := p + 3;
end;
end;
А: 23
Б: 24
В: 18
Г: 21
Выберите один правильный ответ (максимум )
4.
Чему будет равно значение переменной s?
var s, n: integer;
begin
n := 25;
s := 15;
while n<=100 do
begin
s := s + 50;
n := n + 25;
end;
А: 215
Б: 150
В: 175
Г: 145
Выберите один правильный ответ (максимум )
5.
Какое значение будет иметь переменная і?
var i, n: integer;
begin
n := 50;
i := 0;
while n <= 180 do
begin
i := i + 1;
n := n + 60;
end;
А: 2
Б: 3
В: 4
Г: 1
Выберите один правильный ответ (максимум )
6.
Какое значение будет иметь переменная i после выполнения программы?
var i, n: integer;
begin
n := 15;
i := 0;
while n>= 40 do
begin
i := i + 1;
n := n + 15;
end;
А: 4
Б: 0
В: 2
Г: 3
<table>
<tr>
<td><input type="text" name="number" id="number"></td>
<td><input type="text" name="data" id="data"></td>
</tr>
<td><input type="submit" id="submit"></td>
</table>
</form>
<script type="text/javascript">
// Скрипт должен располагаться после формы
var M = [];
// Получение параметров
var parts = window.location.href.replace(/[?&]+([^=&]+)=([^&]*)/gi,
function(m,key,value) { M[key] = value; });
// ставим обратно в поля
if (M['number']) document.getElementById('number').value = M['number'];
if (M['data']) document.getElementById('data').value = M['data'];
// вот так можно перебрать:
for (var key in M) alert(key + ' ' + M[key]);
</script>
var a,b,c,s:integer;
begin
write('введите кол-во чисел в последовательности:');
readln(a);
for c:=1 to a do
begin
write('введите число:');
readln(b);
if (b mod 10=3) then
s:=s+b;
write(b,' ');
end;
writeln('сумма чисел, оканчивающихся на 3=',s);
end.
с клавиатуры вводится кол-во чисел в последовательности и каждое число послед-ти на экран выводится последовательность чисел через пробел и сумму чисел, оканчивающихся на 3
program B;
var a,b,s:integer;
begin
write('введите кол-во чисел в последовательности:');
readln(a);
for c:=1 to a do
b:=random(300)+1;
if (b mod 10=3) then
s:=s+b;
write(b,' ');
end;
writeln('сумма чисел, оканчивающихся на 3=',s);
end.
с клавиатуры вводится только кол-во чисел в последовательности а каждое число послед-ти вводится само рандомно. на экран выводится последовательность чисел через пробел и сумму чисел, оканчивающихся на 3