Program z_1;
var i,n,fact:longint;
begin
writeln('введите число от 1 до 10);
read(n);
fact:=1;
if (n>=1) and (n<=10) then
for i:=1 ti n do
fact:=fact*i
else
write('число не входить в диапозон от 1 до 10');
end.
Язык СИ:
1.
#include<stdio.h>
#include<math.h>
int main(){
long double x,y;
scanf("%Lf%Lf",&x,&y);
printf("%s\n",sqrtl(x*x+y*y)<=2?"yes":"no");
return 0;
}
2.
#include<stdio.h>
#include<math.h>
int main(){
long double x,y;
scanf("%Lf%Lf",&x,&y);
printf("%s\n",-2<=x && x<=0 && -2<=y && y<=0?"yes":"no");
return 0;
}
Vara,b,c,n:integer;
begin
read(a,b,c);
N:=(sqr(a)+sqr(b))*c;
writeln(n);
end.
<span>вот и все</span>