Var x,y,U, S:integer;
begin
readln (x,y);
S:=x+y;
if (S>100) then U:=S/2;
if (S<100) then U:=S; (зависит от условия. по-моему, в задании неправильно поставлено второе условие.)*
writeln (U);
end.
*если в условии написано
"в противном случае умножить на два, то
if (S<100) then U:=S*2;
а если оставить число неизменным, то
if (S<100) then U:=S;
Смотри,на 50 тумбо символов ушло 250 бит инфы,значит на один символ 250/50=5 бит.У юмбы на 30 символов ушло 250+50=300 бит инфы,значит на 1 символ у них ушло 300/30=10 бит.Формула для нахождения количества символов у нас N=2^i,где i- кол-во бит на 1 символ,а N-число символов в алфавите.У тумбо 2^5=32 символа,у юмбо 2^10=1024 символа.Вроде верно
Школьные Знания.com
Задай вопрос из школьного предмета
10 - 11 классы Информатика 5+3 б
Задача матрицы найти максимальный элемент матрицы 16 2 8 9 14 27 (М 6) необходимо решение и блок-схема
Попроси больше объяснений Следить Отметить нарушение Toma74 10.05.2014
Реклама
Ответы и объяснения
AdaLavleis
AdaLavleis Умный
Program Max_element_massiva ;
Var i, n, max : integer ;
A : array [1..100] of integer;
Begin Writeln('Введите количество элементов массива') ;
Readln(N) ;
Randomize;
For i := 1 to N do
begin A[i] := Random(100);
Write(A[i]);
end;
Max := A[1];
For i := 2 to N do
if A[i]>Max then Max := A[i];
Writeln('Максимальный Элемент массива = ',Max) ;
Readln ;
Склероз мучает, но тем не менее 3 информационных процесса я вспомню - хранение, передача, обработка информации. Слегка подумав можно понять что все 3 подходят в определенных условиях, но если случайно так удастся вспомнить еще какие нить информационные процессы, то я уверен найдутся условия при которых съемка фильма однозначно задействует их все