ksoboleva
?>

Сколько операций выполняется при вычислении y, если y=(x+1/2)*(y+7/10)-3/4. по информационным коммуникационным технологиям работа в abcpasqual

Информатика

Ответы

Алексеевна
ответ: 10 2/3 
ну лично я так считаю
elenaowchinik4842
Function prime(x:integer):boolean;
var
 t:boolean;
 d:integer;
begin
 t := true;
 d := 2;
 while t and (d*d <= x) do
   begin
   if x mod d = 0 then 
     t := false;
   d := d + 1
   end;
 prime := t
end;

function order(x:integer):boolean;
var
 t:boolean;
 d:integer;
begin
 d := -1;
 repeat
   t := x mod 10 > d;
   d := x mod 10;
   x := x div 10
 until not t or (x = 0);
 order := t
end;

var
 t:boolean;
 i,k,n:integer;
begin
 t := false;
 read(k,n);
 for i := k to n do
   if prime(i) then
   if order(i) then
     begin
     write(i,' ');
     t := true
     end;
 if not t then
   write(0)
end.
Yelena_Irina826
Class ArrayMultiplication{
 public static void main(String args[]){
  String fileName = "Array.txt", aNum = ""; int nArray[] = new int[201], iChar; nArray[0] = 0; long rMulti;
  java.io.FileReader iFile = null; java.io.FileWriter oFile = null;
  try{
   iFile = new java.io.FileReader(fileName);
   while((iChar = iFile.read())!=-1)
    if(iChar!=' ')aNum+=(char)iChar;
    else {nArray[++nArray[0]] = new Integer(aNum);aNum="";}
   if(!aNum.equals(""))nArray[++nArray[0]] = new Integer(aNum);
   oFile = new java.io.FileWriter(fileName);
   for(rMulti = 1; nArray[0]>0; nArray[0]--)rMulti*=nArray[nArray[0]];
   oFile.write(rMulti+"");
  }catch(java.io.FileNotFoundException fnfe){
   System.out.println("Файл не был найден!");
  }catch(java.io.IOException ioe){
   System.out.println("Ошибка ввода/вывода в файл!");
  }finally{
   try{
 iFile.close(); oFile.close();
   }catch(java.io.IOException ioe){
 System.out.println("Ошибка закрытия файла ввода/вывода!");
   }
  }
 }
}

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Сколько операций выполняется при вычислении y, если y=(x+1/2)*(y+7/10)-3/4. по информационным коммуникационным технологиям работа в abcpasqual
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

dilanarthur27
samogon-mozhaisk
alesia1986
irinalav2705745
александр496
Мартынова_Ринатовна1657
chetverikovalex3738
По информатике. Pascal graph abc
Artyukhin545
petria742
llipskaya
Elenazhukovafashion7
snabdonm501
Fedoseeva
ananyananar
Konstantinovna1936