Очень очень и очень много Задача 1
Вводятся два числа с клавиатуры. Считается их произведение. Если оно меньше 100, то результат вводиться в квадрат. в противном случае, извлекается квадратный корень
Задача 2
Дано Вещественное число А и целое число N. Используя цикл, найти сумму. 1+А^1+А^2+А^3+..+А^N
249
413
Ответы на вопрос:
1
var a,b:integer; begin readln(a,b); writeln(2*a*b*ord(a=b)+a*b*ord(a<>b)); readln end.
Объяснение:
2
var a, s: real;
i, n: Integer;
begin
readln(n);
readln(a);
s := 1;
for i := 1 to n do
s := s-a;
a := -a*a;
end;
end;
Общее количество клеток = 9*9 = 81 вероятность попасть в желтый однопалубный корабль = 7/81 вероятность попасть в красный однопалубный корабль = 49/81 вероятность потопить корабль = 7/81*0,27 + 49/81*0,40 = 0,265 в процентах: 26
Популярно: Информатика
-
Нармин5928.09.2020 03:41
-
oksanasyxovaro15.11.2021 02:33
-
Оля03090519.03.2021 11:48
-
juehxbrf13.05.2021 12:32
-
megalolka2127.03.2023 09:08
-
zzzzzzz55555505.05.2023 21:35
-
NastyaBay271007.08.2020 06:51
-
NickMean19.10.2021 14:04
-
haha110.01.2020 20:03
-
Xaker56722.03.2020 13:43