var x1, x2, y1, y2, r1, r2, d, b, x3, x4, y3,y4,x,y, h, a: real;
begin readln(x1, y1, r1, x2, y2, r2); d : = sqrt(sqr(x1 - x2) + sqr(y1 - y2)); if (d > r1 + r2) or (d < abs(r1 - r2)) then writeln('no intersection point') else if (x1 = x2) and (y1 = y2) then if (r1 = r2) then writeln('infinity') else writeln('no intersection point') else begin b : = (r2 * r2 - r1 * r1 + d * d) * 0.5 / d; a : = d - b; h : = sqrt(abs(r1 * r1 - sqr(; x : = x1 + (x2 - x1) * a / d; y : = y1 + (y2 - y1) * a / d; x3 : = x - (y - y2) * h / b; y3 : = y + (x - x2) * h / b; x4 : = x + (y - y2) * h / b; y4 : = y - (x - x2) * h / b; writeln(x3, ' ', y3); if(x3< > x4)or(y3< > y4) then writeln(x4, ' ', y4); end; end.
Python:
cost = int(input('Cost per 1 kg is\n>>'))
print('Cost for 150g is {}'.format(cost * 0.15))
print('Cost for 300g is {}'.format(cost*0.3))
print('Cost for 3 kg is {}'.format(cost*3))
C++:
#include <iostream>
int main(){
int cost;
std::cout<<"Cost per 1 kg is\n>>";
std::cin>>cost;
std::cout<<"For 150g is "<<cost*0.15<<"\n";
std::cout<<"For 300g is "<<cost*0.3<<"\n";
std::cout<<"For 3 kg is "<<cost*3<<"\n";
return 0;
}
Поделитесь своими знаниями, ответьте на вопрос:
1) дан массив целых чисел, состоящий из 10 элементов. заполнить его с клавиатуры. вывести на экран только те числа, для которых из значение больше номера их индекса. ,
var m : array [1..10] of integer; i : integer; begin writeln('введите массив: '); for i : = 1 to 10 do begin write(i, ': '); readln(m[i]); end; for i : = 1 to 10 do if m[i] > i then write(m[i], ' ');
readln; end.