Реши задачу. В январе Ире подарили пару новорождённых кроликов.
Через два месяца они дали первый приплод — новую пару кроликов, а затем давали приплод по паре кроликов каждый месяц. Каждая новая пара также даёт первый приплод (пару кроликов) через два месяца, а затем — по паре кроликов каждый месяц.
Сколько пар кроликов будет у Иры в июне (максимальное количество)?
6
9
8
36
PascalВыделить код
1
2
3
4
5
6
7
8
9
10
11
12
var s:string;
len,i,n:integer;
begin
write ('Введите строку:'); readln (s);
write ('введите N:'); readln(n);
len:=length(s);
if len>n then s:=copy (s,len-n+1,len-n)
else if len<n then for i:=len+1 to n do insert('.',s,1);
writeln ('Итоговая строка: ');
write (s);
readln;
end.
Введите строку:qwertyuiopa
введите N:5
Итоговая строка:
uiopa
Введите строку:abrik
введите N:10
Итоговая строка:PascalВыделить код
1
2
3
4
5
6
7
8
9
10
11
12
var s:string;
len,i,n:integer;
begin
write ('Введите строку:'); readln (s);
write ('введите N:'); readln(n);
len:=length(s);
if len>n then s:=copy (s,len-n+1,len-n)
else if len<n then for i:=len+1 to n do insert('.',s,1);
writeln ('Итоговая строка: ');
write (s);
readln;
end.
Введите строку:qwertyuiopa
введите N:5
Итоговая строка:
uiopa
Введите строку:abrik
введите N:10
Итоговая строка:
Помимо цифр, на мониторы ЭВМ необходимо выводить еще и множество символов. Ясно, что для вывода каждого символа необходим некий машинный код, однозначно соответствующий этому символу, или некое правило, по которому можно организовать корректный вывод каждого символа на дисплей. Разумеется, разрабатывать такую систему ввода-вывода следует оптимальным образом с точки зрения потребления ресурсов компьютера. Особенно важно в этом случае помнить о том, что производительность компьютеров в отдаленные времена зарождения вычислительной техники была ничтожной, с современных позиций, а системные программисты и разработчики аппаратной части боролись за каждый бит, адрес, инструкцию, регистр, освобождая оперативную память и адресное пространство компьютерных "малышей".