Всі числа кратні 7 одночасно до 98 включно
#include <iostream>
int main()
{
for(int i = 2; i<=14;i++)
{
std::cout<<i*7<<"\n";
}
}
Ответ:
нельзя однозначно определить
Объяснение:
Площадь прямоугольного треугольника равна половине произведения его катетов. Получаем уравнение:
0.5kd = 12(k+d)
kd = 24k + 24d
k = 24d / (d - 24)
Очевидно, что при d > 24 могут быть получены k, для которых высказывание будет истинным. Также, наборы k и d, не удовлетворяющие полученному решению, делают высказывание ложным.
var s:string; i,n:integer;
Begin
read(s);
for i := 1 to length(s) do begin
if s[i]="(" then n=n+1;
if s[i]=")" then n=n-1;
if n<0 then begin
Write("нет баланса");
halt;
end;
Write("есть баланс");
End
Если в первый день машинист проехал 10 км, то во второй день он проехал на 5 км больше
сколько км проехал машинист за два дня?
10 + 5 = 15 (второй день)
15 + 10 = 25 (проехал за два дн
<span>const n = 15;</span>
<span>var</span>
<span> a: array[1..n] of integer;</span>
<span> i, count: integer;</span>
<span>begin</span>
<span> for i := 1 to n do begin</span>
<span> a[i] := random(100);</span>
<span> write(a[i], ' ');</span>
<span> if(i mod 2 = 0) and (a[i] mod 2 <> 0) then inc(count);</span>
<span> end;</span>
<span> writeln;</span>
<span> writeln('[', count, ']');</span>
<span>end.</span>