так чтоли?
<html>
<head>
<title>Анкета</Title>
</head>
<body>
<h1>Анкета</h1>
<form>
Какой браузер вы используете?
<select name="browser">
<option selected> Internet Explorer
<option> Opera
<option> Mozila
</select>
<br/>
Ваша электронная почта <input type="text" name="email" />
<br/>
Ваше имя <input type="text" name="name" />
<br/>
</form>
<a href="mailto:[email protected]">mailto:[email protected]</a>
</body>
</html>
1) var A: array [1..2] of real;
B: array [1..20] of real;
i:integer;
c:boolean;
begin
c:=false;
readln(a[1],a[2]);
for i:=1 to 20 do begin
readln(b[i]);
if (b[i]=a[1]) then begin writeln('A[1]=B[',i,']=',b[i]);c:=true; end;
if (b[i]=a[2]) then begin writeln('A[2]=B[',i,']=',b[i]);c:=true; end;
end;
if c=false then writeln('Совпадений не найдено');
end.
2) var a:array[1..10] of real;
npol,notr,i: integer;
begin
npol:=0;
notr:=0;
for i:=1 to 10 do begin
readln(a[i]);
if a[i]>0 then npol:=npol+1;
if a[i]<0 then notr:=notr+1;
end;
writeln('Количество положительных значений: ',npol,', количество отрицательных значений: ',notr);
end.
Разберем все по порядку...
Смотрим на :
Алг
Нач
цел b , c
b := 0
c := 0
Все эти строки посвящены тому, чтобы просто присвоить b и с по 0.
Дальш
нц пока b <> 10
c := c + b
b := b + 1
кц
Я лично разобрался в этих странных буковках ,зная язык програмирования - Pascal.
Очевидно, что это цикл (While), кц - окончание цикла.
Разберемся, что сдесь происходит:
Так... пока b<>10 программа суммирует заданное значение B, а потом увеличивает b на 1, и так десять раз.
тоесть с будет изменяться:
0, 1, 3,6,10,15,21,28,36,45 - это окнечный результат, потому что когда b=9, и ему присваивают: b:=9+1=10 цикл - окончивается. Итого, в результате цикла,с=45.
Дальше:
вывод c
Все знают ,что это озночает.
ответ: на экран будет выведено : 45