Листинг 1:
program sum_cubes;
(c) NaaMan}
function func(x: real): real;
begin
Result := 3*x*x + 3*sin(x);
end;
const
start = 0.0;
finish = 5.0;
step = 0.7;
var
sum, i: real;
n: integer;
begin
sum := 0;
n := 0;
i := start;
while i <= finish do begin
var y: real;
y := func(i);
writeln(i,' ', y:8:3);
if y > 0 then begin
sum := sum + power(y,3);
n := n + 1;
end;
i := i + step;
end;
writeln( 'Sum = ', sum:10:3, ' Count = ', n);
end.
Листинг 2:
program arr_sum_cou;
(c) NaaMan}
var
sum, n: integer;
begin
sum := 0;
n := 0;
var a := ArrRandomInteger(100, -40, 40);
foreach var i in a do
if i < 0 then
sum := sum + i
else
n := n + 1;
writeln('Array: ', a);
writeln( 'Sum = ', sum, ' Count = ', n);
end.
Листинг 3:
program arr_sum_cou;
(c) NaaMan}
var F: boolean;
begin
F := True;
var A := ArrRandomInteger(10, 1, 10);
var B := ArrRandomInteger(10, 1, 10);
writeln(A);
writeln(B);
for var i := 0 to 9 do
if A[i] = B[i] then begin
writeln('Item = ', i, ' Value = ', A[i]);
F := False;
end;
if F then
writeln('Совпадений нет.');
end.
Поделитесь своими знаниями, ответьте на вопрос:
Если требуется ввести с клавиатуры значение и преобразовать его в целочисленный формат, то нужно переменной присвоить..float(input())str(input())int(input())input()
Объяснение:
Сочинение на тему: Наше будущее в наших руках
В современном мире достаточно трудно найти человека, который не хотел бы узнать свое будущее. Каждый из нас неоднократно задумывался над вопросом: что с нами будет через несколько лет? ответ на это вопрос ищут в знахарей или колдунов. Однако мало кто склоняется к мысли, что наше будущее зависит только от нас самих, только мы его менять.
Народная пословица гласит: «Каждый человек — кузнец своего счастья». Трудно не согласиться с этим мнением, ведь в мире не существует такой силы, которая построила бы наше будущее за нас.
Я склоняюсь к мысли, что каждому из нас под силу творить свою собственную жизнь. В мире существует множество примеров, когда люди, благодаря своему труду, настойчивости и таланта, достигали невероятных высот. На эту землю все приходят равными, однако свое будущее каждый строит сам.
Я считаю, что в жизни нельзя изменить только две вещи: дату рождения и дату смерти. Все остальное в наших руках. Существуют люди, которые готовы оспорить этот тезис, однако другие разделяют со мной такую позицию. Если человек верит в светлое будущее и готов для этого упорно работать, то очевидным фактом является то, что он достигнет невероятного успеха.
Ярким примером создателей светлого будущего есть народ, который пережил много лет порабощения через кровавые страдания, пережил нечеловеческие издевательства, но все это время боролся за собственную независимость и собственноручно ее получил. Ведь будущее страны было лишь в руках его народа, который благодаря своему несокрушимому духу сумел построить сильное, независимое государство.
Итак, исходя из всего выше сказанного, можно сделать вывод, что судьба каждого человека зависит только от него самой. Каждый из нас — творец собственного счастья. Наше будущее зависит от того, что мы будем делать сейчас. И начинать нужно уже сейчас, закладывая маленькие кирпичики в свой дом под названием «будущее». И всегда следует помнить, что наше будущее, в наших руках, главное их не опускать!