rigina82
?>

Составить программу для вычисления значения функции у(х): у= 0, если х< =0, х в квадрате, если х> 0

Информатика

Ответы

studiojanara
Var x,y: integer; begin writeln('input x'); if x< =0 then y: =0 else y: =sqr(x); writeln('y=',y); end.
dmitzu8594
Const n=4; var f: text; a: array[1..n,1..n] of integer; i,j,t: integer; begin writeln('1: '); assign(f,'my.txt'); reset(f); for i: =1 to n do   begin   for j: =1 to n do   begin   read(f,a[i,j]);   write(a[i,j]: 3);   end;   readln(f);   writeln;   end; close(f); for i: =1 to n do   for j: = i+1 to n do   begin   t: =a[i,j]; a[i,j]: =a[j,i]; a[j,i]: =t;   end; writeln('2: '); for i: =1 to n do   begin   for j: =1 to n do write(a[i,j]: 3);   writeln;   end; end. пример: файл my.txt: 23 28 19 23 34 14 8 14 44 20 14 48 38 47 20 41 результат: 1: 23 28 19 23 34 14   8 14 44 20 14 48 38 47 20 41 2: 23 34 44 38 28 14 20 47 19   8 14 20   23 14 48 41  
bochkarevazh
//dev-c++ 5.11 #include < stdio.h> int main(void)   {long long int i,curr;   int currsum,flag;   long long sum=0;   for(i=8; i< =1111111; i++)   {curr=i;   flag=0;   currsum=0;   while (curr! =0 & & flag==0)     {if (curr%10==0)     flag=1;     else     {currsum+=curr%10;   curr/=10; }}   if(flag==0 & & currsum==7)     sum+=i; }   printf("%d",sum);   return 0; } вывод: 2165220

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

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

Составить программу для вычисления значения функции у(х): у= 0, если х< =0, х в квадрате, если х> 0
Ваше имя (никнейм)*
Email*
Комментарий*

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

Кристина Валентиновна
ВостриковаСтародубцева1980
akuznecov8989
Alekseevich1012
Наталья Юрьевич1228
irina611901
Aleksei806
Tamara
ayanrsadykov
sergeystepanov231
tatiana2676
Burov1446
Олег86
shmidt
alisapavlushina