Vladimirovna Dmitrieva
?>

Составить программу для ввода двух чисел и вывода на экран суммы их кубов.

Информатика

Ответы

Valerevna-Vardan
Либо так. var a,b,j: integer; begin writeln('введите первое число'); readln(a); writeln('второе число'); readln(b); j: =(a*a*a)+(b*b*b); writeln('сумма кубов введенных чисел = ',j); end.
leobashkurov1089
Uses crt; var a,b: integer; begin writeln('введите числа: '); read(a,b); writeln(power(a,3)+power(b,3)); end.
kartyshkinaaa
#include < string> #include < iostream> using namespace std; int main(){     string s;     cin> > s;     if(s[0]! ='1'){                   cout< < "no";                   cin.get();                   cin.get();                   return 0;                   }     for(int i=1; i< s.length(); i++){             if((s[i]! ='1') & & (s[i]! ='0')){                             cout< < "no";                             cin.get();                             cin.get();                             return 0;                             }                             }     cout< < "yes";     cin.get();     cin.get();     return 0; }
Овсянкина407
Program z1;   var i,n,a,b,c: integer;         m: array [1..1000] of integer; begin  write('введите кол-во чисел - ');   readln(n);     randomize;     a: =0;     b: =0;     c: =0;     for i: =1 to n do  begin    m[i]: =random(100)-50;       write (m[i],' ');   end;       for i: =1 to n do    if (m[i]=0) then a: =a+1;         for i: =1 to n do    if (m[i]> 0) then b: =b+1;         for i: =1 to n do    if (m[i]< 0) then c: =c+1;   writeln;   writeln ('кол-во нулей - ',a);   writeln ('кол-во положительных чисел - ',b);   writeln ('кол-во отрицательных чисел - ',c); end.

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

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

Составить программу для ввода двух чисел и вывода на экран суммы их кубов.
Ваше имя (никнейм)*
Email*
Комментарий*

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

d5806252
romolga3580
market-line5260
devochkadafka624
Zhanibekrva Kandaurova
roman-fetisov2005
maisa1991
konstantin0112
Rjkjneirbyf555
Yevgenii1423
dmitryshigin
ipeshindina236
sergeykirushev
Носов Тоноян
Матфеопуло1006