Помогите пожалуйста! Срочно!

Помогите пожалуйста! Срочно! Напишите программу, которая вычисляет 2 в степени 100, 3 в степени 50, 2+2*2, корень из 3. В ответе, помимо текста самой программы, укажите результат выполнения программы. Даны две переменные типа integer: a и b. Напишите программу, которая без создания дополнительной переменной меняет их значения местами, то есть переменная a становится равной b, а b — a. Если вы не можете придумать решение, укажите хотя бы ваши идеи.

в избранное

ibraim-k

05 августа 2022

Program Power; begin writeln ('2^100=',power (2,100); writeln ('3^50=',power (3,50); writeln ('2+2*2SQRT (3)=', 2+2*2*sqrt (3); end.Program Change; uses crt; var a,b: integer; begin writeln ('Input A and B '); write ('A='); readln (a); write ('B='); readln (b); writeln; writeln; writeln; writeln ('A=',a,' B=',b); writeln ('Меняем… '); b: =a+b; a: =b-a; b: =b-a; writeln ('A=',a,' B=',b); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?