program slova;
uses crt;
var s, s1: string;
i, k: integer;
begin
clrscr;
writeln ('Vvedite text: ');
readln (s1);
write ('Slova soderjaschie ne bolee 3-h bukv: ');
for i:=1 to length(s) do
begin
if s[i]<>' ' then
begin
s1:=s1+s[i];
k:=k+1;
end
else
if k<=3 then
begin
write (', ',s1);
k:=0;
delete (s1,1,3);
end
else
begin
k:=0;
delete (s1,1,15);
end;
end;
readln;
end.
Вроде так, но у меня щас нету компилятора, так что проверить не могу. Если что-то будет ругаться, или вопросы какие - пиши в личку.
1) 1. Инициализируешь числовые переменные
2. Присваиваешь им (H,S) значения посредством ввода (readln, если Pascal, input, если Python и т.п.)
3. Присваиваешь переменной - результату значение: h*s/60
4. Выводишь ответ. (writeln(pascal), print(python))
2) Решено правильно другим участником проекта.
3) Инициализируешь переменные и подставляешь в выражение, выводишь результат.
<span>Первый ютер был apple 1,его придумал Стив Джопс,основатель компании эпл</span>
Зная что F = 1111 а 1 это 1 и что каждую цифру нужно заменять по тетрадам(четверкам) по правилу позиционной системы счисления нужно заменить
F на 1111
1 на 0001
и соединить
Ответ : 11110001