profile
Опубликовано 6 лет назад по предмету Информатика от DavT

Данные числа c и d являются соотвественно квадратом и кубом числа "A"
нужно составить программу , печатающее значение true, если указанное выражение  является истинным, и fase в противном случае
Главное программу! Будьте добры 

  1. Ответ
    Ответ дан PsyhoAssasin

    Program KvCube;

    Uses Crt;

    var a,c,d:integer;

    begin

         clrscr;

         write('Введите число А:');

         readln(a);

         write('Введите квадрат числа А:');

         readln(c);

         write('Введите куб числа А:');

         readln(d);

         if ((c=a*a) and (d=a*a*a)) then writeln('TRUE')

              else  writeln('FALSE'); 

        readkey;

     

    end. 

     

     

Самые новые вопросы