Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
#include < iostream> #include < clocale> #include < cmath> using namespace std; void main(){ setlocale(lc_ctype,"rus"); int x, sum=0; cout< < "введите переменную: "; cin> > x; for(int i=1; i< x; i++) { if(x%i==0) sum+=i; } if(x==sum) {cout< < "это совершенное число"< < endl; } else {cout< < "это несовершенное число"< < endl; }}
аборигеном
квадрат вписан в круг при условии что r*2(диаметр)> диагонали квадрата
на qbasic
? "введите 2 числа - радиус круга и сторону квадрата соответсвенно"
input a; b
c=a*2 диаметр
g=sqr(a*a+a*a) диагональ
if c> g then 1 else 2
1 ? "квадрат вписан в круг"
goto 3
2 ? "квадрат не вписан в круг"
3 end
var a: array [1..10] of integer;
n,i: integer;
begin
{vvod massiva skopirovat suda}
for i: = 1 to 10 do begin
if a[i] mod 10 = 0 then
n: =n+1;
end;
writeln(n);
end.
Популярные вопросы