составить программу, которая запорашивает пароль до тех пор пока он не будет правильно введен,вывести количество неправильных попыток(все это с циклом
10-11 класс
|
repeat)
var k:integer;
s:string;
begin
repeat
readln(s);
k+=1;
until length(s)>=8;
writeln(k);
end.
Другие вопросы из категории
1.Какое количество информации получит игрок, которому из колоды в 32 карты
достают короля пик? А если то же, но из колоды в 36 карт?
2. В рулетке общее количество лунок 128. Какое количество информации мы получаем, увидев, что шарик остановился в 25 черное?
3.Сколько страниц в брошюре, если сообщение о том, что случайно открылась 17 страница содержит 6 бит информации?
4. Сколько нужно задать вопросов, чтобы угадать натуральное число не более 100?
Написать программы для выполнения следующих заданий:
Бесконечно печатать букву А: ААААААААААА.....
Ответ:
3. Задание
Бесконечно печатать 1000 999 998 997 996......
Написать программу на, которая определяет неизвестное основание системы счисления.
Читайте также
(1+1/1)(1+1/4)(1+1/9)(1+1/16)(1+1/25)(1+1/36)…
Вычисление происходит до тех пор, пока произведение сомножителей не станет больше, чем 3.6.
В ответе написать количество сомножителей для данного вычисления. В ответе указать только число, например, 15
пересечения прямых, описываемых уравнениями a1x+b1x=c1 и a2x+b2x=c2. Если прямые пересекаются или не существуют-выдать соответствующее сообщение. 2) даны действительные числа a1, b1, a2, b2. Составьте программу, которая определяет, какая из точек A(a1;b1) или B(a2;b2) лежит на прямой у=2х+1. Если такой точки нет-вывести соответсвующее сообщение.
Использовать цикл с предусловием.
На обычном паскале, не турбо.