Program abs;
var x,y,z:integer;
begin
readln(x);{первое число}
readln(y);{второе число}
z:=x+y;{их сумма}
if (z mod 3)=0 then
writeln(''Yes'')
else writeln(''NO'');
end.
Ответ:
Объяснение:
1) Рассмотрим 10байт=80бит, если 1 символ - 8 бит, то получается, что строка стала меньше на 10 знаков.
При вычеркивание одного слова мы еще удаляем 1 пробел и запятую, те на слово приходится 10-2 символа. 8 символов - крокодил.
2)
22байта=176 бит. Количество знаков 176/16= 11, значит на слово остается 9 символов. Это аллигатор
Не очень понял что именно от тебя хотят.Но если все действия происходят в Паскаль, то задача на оператор ветвления.А вот и сама программа на всякий случай:
Program Proverka;
uses CRT;
var x:real;
Begin
clrscr;
writeln ('Введите X');
readln (x);
IF x<0 then
writeln ('Отрицательное число x=' , x:5:2) Else
Begin
IF x>0 then
writeln ('Положительное число x=' , x:5:2) Else
writeln ('Вы выбрали неверное значение'); End;
readln;<span>
End.</span>
Скачай в интернете активатор, и он активирует тебе автоматически Windows, там их много поищи по поисковику.
Вложенные циклы - это когда один цикл находится внутри другого. они используются, например, для обхода многомерных массивов. пример:
for i:=1 to 10 do
for j:=1 to 5 do
if a[i][j]>0 then writeln('Число положительное');