1. a=10 ( не меняется значение)
2. a=12 (т.к. если 10>5 то а=12)
3. a=3 (если 10<5 то +15 иначе -7)
4. а=22 (тоже самое)
5. a=3 (тоже самое)
6. а=22 (удивительно, но все аналогично)
Для примера-Вк
1)Безопасность сайта
Мы пишем вк.сом , или vk com ,когда компания реал забрала домен- это дает защиту для Официального Вк,т.к можно было бы зарегистрировать кто-то левый человек домен и он бы получал прибыль от рекламы,слитые пароли владельцу такого домена.
2)Удобство использования сайта,разделение для разных версий (комп.версия,телефон)
3)Для тестирования различных по,скриптов для сайтов и т.д
4)Разделение информации основного сайта(фото,текст,документы и т.д)
Var
A: array [1..20] of integer;
B, C: array [1..10] of integer;
i, tmp: byte;
begin
for i := 1 to 20 do
begin
A[i] := random(30)+1;
write(A[i]:4);
tmp := tmp + 1;
if i mod 2 <> 0 then C[tmp] := A[i]
else
begin
B[tmp - 1] := A[i];
tmp := tmp - 1;
end;
end;
writeln;
for i := 1 to 10 do write(B[i]:4);
writeln;
for i := 1 to 10 do write(C[i]:4);
end.
Program asd;
var a,b:integer;
begin
a:=10;
writeln('1=10');
for b=2 to 10 do
begin
writeln(b,'=',a+((a/100)*10);
a:=a+((a/100)*10);
end;
end.
Ответ:
Скорее всего 1
Объяснение:
Но я не уверен насчет "ху"
Во втором скорее всего не пройдет End
В третьем var
в четвертом begin
Тебе проще составить простенькие программы и посмотреть самому
