Напишите программу обратного отсчета с использованием переменной n внутри скобок функции range(). Она должна спрашивать пользователя, с какого момента следует начать обратный отсчет. Футбольная команда набирает девочек от 10 до 12 лет.

Напишите программу с использованием цикла, которая будет запрашивать возраст и пол претендента, используя для обозначения пола буквы m (от male — мужчина) и f (от female — женщина), до тех пор, пока не соберет 5 девочек.

Программа должна выводить на экран сообщение, информирующее, подходит ли претендент для вступления в команду.

var s : string; k,f : longint; begin  readln(s);   val(s[1],k,f);   if f< > 0 then writeln('некоректно введена строка')   else if length(s)-1=k then writeln('равно')            else writeln('неравно'); end.

смотри скриншот                                    

1) через горячие клавиши

вынесением кнопок в панель инструментов (word например)

через консоль, если таковая имеется (например vi)

жестами мышки (opera)

голосовыми (opera)

2)delete (del), copy(ctrl+c), cut(shift+del), paste(ctrl+v)

3) open(ctrl+o), save(ctrl+s)

program sir; var y,x,h: real; beginx: =280; h: =0.1; while h< =1 do  begin  y: =x*h;   writeln('цена за ',h*1000,' грамм ',y,' руб');   h: =h+0.1  end; end.