var x, a, b, s : real;
const e : real = 2.71;
begin
a := 0.5;
b := 0.8;
writeln( 'Введите x= ' );
read( x );
if ( x <=1 ) and ( x >= -1 ) then
begin
s := exp( - a * x * ln( e ) ) * cos( x ) + exp( - b * x * ln( e ) ) * sin( x );
write( 'S=' );
writeln( s );
end
else
writeln( 'Вычисление невозможно' );
end.
var z, x : real;
var a, b : integer;
const e : real = 2.71;
begin
a := 1;
b := 3;
writeln( 'Введите x= ' );
read( x );
if ( x >= 2 ) then
begin
z := sin( a*x );
write( 'Z=' );
writeln( z );
end
else if ( x < 2 ) then
begin
z := exp( -a*x * ln( e ) ) * cos( b*x );
write( 'Z=' );
writeln( z );
end
end.
Объяснение:
Нил находиться в Африке, протяженность 6853 км^2.
Амазонка находиться в Южной Америке, протяженность 6992 км^2.
Янцзы находиться в Китае, протяженность 6300 км^2.
Миссисипи находиться в США, протяженность 3734 км^2.
Иртыш-Обь, река в Китае, Казахстане и России, левый, главный приток Оби, протяженность 4248 км^2.
Енисей-Ангара находиться в Сибири, протяженность 3487 км^2.
Хуанхэ находиться в Китае, протяженность 5464 км^2.
Амур - Шилка - Онон находиться в северо-восточной Монголии и Забайкальском крае России, правая составляющая Шилки, протяженность 1032 км^2.
Лена находиться в Росси, протяженность 4400 км^2.
Конго находиться в Центральной Африке, протяженность 4374 км^2.
#include<stdio.h>
#include<conio.h>
main()
{
int x,y,z;
printf ("Vvedite chislo 1 voskresenua");
scanf("%d",&x);
y=0;
while (x<30)
{
x=x+7;
y++;
}
printf ("Vsego %d dney",y);
getch();
}