Var a,b,c:real;
begin
readln(a,b,c);
if (a<b+c) and (b<a+c) and
(c<a+b) then writeln('mojet') else writeln('ne mojet');
<span>end.</span>
Var input:integer;
begin
write('Enter number - ');
readln(input);
case input of
1..9:writeln('Odnozhachnoe!');
else writeln('Error!');
end;
end.
30*60*4=7200 символов
6300*8=50400 бит
50400/7200=7 бит на один символ
2^7=128 - мощность алфавита
Как вариант
#include <stdio.h>
int main(void)
{
int arr[5] = { 5, 9, 0, 3, 4 };
int sum = 0;
for (int i = 4; i > 0; --i) {
if (arr[i] == 0) {
for (int j = i; j < 5; ++j) {
sum += arr[j]; } break;
}
}
printf("%d", sum);
}