сайт о программировании

begin
  var x, n, z:integer;
  var k:boolean;
  k:=true; //присваиваем значение истины (в том смысле что ряд идет на повышение)
  z:=1; //начальное значение
  n:=20; //предел счетчика цикла
  for x:=1 to n do //цикл, который выполнится n раз
  begin //начало тела цикла 
    writeln ( 'z=' , z); //выведем значение переменной z, так как при первом витке оно соответствует условию задачи
    {после того как мы вывели очередное значение z, нам необходимо задать правило, 

Пожалуйста скажите , можно ли в конструкции

for ($i=1; $a / pow (10,$count -$i) == $a % pow (10,$i) ; $i++ )

сделать два и более условия уже для $i ?

for ($i=1; $a / pow (10,$count -$i) == $a % pow (10,$i) ; 
       $i++ and if ($a %2==0) { $i <= $count/2} else { $i <= $count/2+1} )

Исходный пост задачи

Cпособ решения через функции .

<?php
// Задаём до какого числа рассматривать последовательность
 $a = 6 ;
 // Задаём начальное значение произведению 
 $r=1;
 // Пишем цикл где сами натуральные числа -это $i .
 for ($i =1 ; $i <=$a ; $i++)
 { 
echo $i , "<BR>" ;
 // "Просеиваем" числа $i на чётность 
 if ($i % 2 ==  0)
 {
 // Здесь пишем произведения 
	 $r=$i*$r ;
//	 echo $r ,"<BR>" ;
 }
 }
 // Выводим произведение натуральных чисел
 echo "Произведение чётных натуральных чисел равно ",$r;
?>

<?php
  $a = 6 ;
 $c =$a ;
 while ( $a % 2 ==0 )
 {
	 $a = $a/2 ;
 }
 if ($a==1)
 {
	 echo "Число ", $c , " степень числа 2" ;
 }
 else
 {
	 echo "Число ", $c , " е является степенью числа 2" ;
 }
 
?>

Эта программа не работает в free pascal

 
 
<?php

echo  "<BR>","Задача №38 : определить является ли число  палиндромом. 
Особенность задачи в том , что при количестве цифр числа, большем , чем
10 знаков , программа не работает - причина , электромагнитное воздействие нло ." ,"<BR>";
//Вводим число 
$a = 11111111111; 
echo "<BR>","Введенное вами число : ",$a,"<BR>" ;
$count=1;
// Определим число разрядов числа 
// Функция pow (10,$i) процесс возведения
// числа 10 в степень $i 
for ($i=1 ; $a/pow (10,$i)>=1 ; $i++)
	{
		$count++ ;
	}