Задать вопрос!

Задать вопрос!

Все категории

4 года назад

13

Под номером 68 помогите сделать

Под номером 68 помогите сделать

Информатика

1 ответ:

Кисольда [52]4 года назад

0 0

Не поняла извини пожалуйста что за цепочка?

Читайте также

Информатика паскаль. Решите

lenika58 [21]

var y,x,z: real;

begin

readln(x,y);

z:=ln(abs((y-sqrt(abs(x)))*(x-y/(x+x*x/4))));

write(z);

end.

0 0

3 года назад

20 баллов ребят, помогите пожалуйста

Максим007

Ответ: 2
Мы ставим курсор в начало латинского слова, затем удаляем его.
Что бы удалить символ после курсора нужно нажать delete.

0 0

4 года назад

Дан массив А(8). (3,5,7,-11,-5,3,7,8) . Найти сумму не четных элементов

Alexandr08

PascalABC.NET 3.3

begin
var a:=Arr(3,5,7,-11,-5,3,7,8).Println;
writeln('s = ',a.Where(x->x mod 2<>0).Sum);
end.

Результат:
3 5 7 -11 -5 3 7 8
s = 9

0 0

4 года назад

Определите стоимость машины, если Митсубиси - 119 млн Шевролет - 40 млн Порше - 113 млн Москвич - 27 млн Ламбаргини 22 млн Сайер

Gheaers

119 млн.
В первом случае- 119-40=79
Во втором случае- 113-27=88
В третьем нужно, чтобы была разница в 97 млн, ведь такова закономерность. Десяток прибавляется, а единица убывает.
22+97=119
А вообще, таких цен нет :)

0 0

3 года назад

Дан массив из 10 элементов вывести их на экран и выяснить является ли n-элемент отрицательным числом. КуМир!

tas2017

var a: array[1..999] of integer; var n: integer;
begin
for var i := 1 to 10 do begin
a[i] := random(-9, 9);
write(a[i] + ' ');
end;
writeln;
read(n);
if a[n] < 0 then
write(n + '-элемент является отрицательным числом')
else
write(n + '-элемент не является отрицательным числом');
end.

0 0

4 года назад