#include <stdio.h>
int main()
{
int cm, m;
printf("Enter cm: ");
scanf("%d", &cm);
m = cm / 100;
printf("Result: %d meters.", m);
return 0;
<span>}</span>
Орган ухо если один то это юлитка. Канал слуха это тунель .
1. <span>var N, k: real; </span>
<span>begin </span>
<span>readln(N); </span>
<span>if (N<0) then k:= 0 </span>
<span>else </span>
<span>begin </span>
<span>if (frac(N)=0) then k:=N*2 </span>
<span>else k:=(trunc(N)+1)*2; </span>
<span>end; </span>
<span>writeln(k); </span>
<span>end.
2. </span><span>Первый хулиган увеличивал количество кусочков на 3
Второй - на 6
То есть, всего кусочков должно быть N = 1 + 3m + 6n
Значит, N - 1 должно делиться на 3
и наоборот, если N - 1 делится на 3
N - 1 = 3k
то возможна ситуация, когда Первый хулиган рвал k раз,
а Второй наблюдал (ничего не рвал).
Алгоритм свёлся к проверке:
Если N -1 не делится на 3, то No
КОНЕЦ</span>
Const
n = 5;
var
arr: array [1..n] of integer;
i, max: integer;
begin
for i := 1 to n do
begin
write('A[', i, '] = ');
readln(arr[i]);
end;
max := 1;
for i := 1 to n do
if (max < arr[i]) and (arr[i] mod 5 = 0) then
max := arr[i];
if max = 1 then
writeln('No')
else
writeln(max);
end.