vallium8354
?>

Алфавит содержит 256 букв определите информационный 1 вес символа

Информатика

Ответы

Gesper63

//Для примера написал программу, которая просит пользователя ввести пароль. В программе ограничено количество попыток ввода пароля до 5, то есть, если пользователь с пяти раз не смог правильно ввести пароль, программа сообщает, что попытки ввода закончились.

//Для этой задачи использовал цикл c постусловием (repeat - until)


const

  attempts = 5;

  password = '12345';

   

var

  counter: integer;

  str: string;

   

begin

  counter := 0;

   

  repeat

     write('Введите пароль: ');

     readln(str);

     

     if not(str = password) then

     begin    

        counter := counter + 1;

        writeln('[неверный пароль] осталось попыток: ', attempts - counter);

        writeln();

     end;

         

     if (counter = attempts) then

     begin

        writeln('Попытки ввода закончились!');

        break;

     end;

   

  until (str = password);

   

  if (str = password) then

     writeln('Вы ввели правильный пароль!');

end.


Как ограничить количество попыток ввода в паскаль до 5? какой цикл надо использовать?
Жукова_Петрович1281

#include <iostream>

#include <cstring>

#include <fstream>

using namespace std;

bool check_polindrom(string word)

{

int len = word.length();

for(int i = 0; i < len/2; ++i)

{

 if(word[i] != word[len-i-1])

 {

  return false;

 }

}

return true;

}

int main()

{

   ifstream ifs ("input.txt");

string str;

ifs >> str;

ifs.close();

   ofstream ofs ("output.txt");

   cout<<str;

if(check_polindrom(str))

 ofs<<"1";

else

       ofs<<"0";

ofs.close();

return 0;

}


Работа с файлами также выполнена (файлы input.txt и output.txt поместить в папку со скриптом main.cpp) ©CodeBlocks

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Алфавит содержит 256 букв определите информационный 1 вес символа
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Шиловский126
lyukiss
Vladimirovna1370
PushkinaKurnosov984
donertime8
Bolshakova Shigorina
Natysya7777
Sacharov84
nordwokintos4
sargisyan
irina611901
koxhulya61
ayanrsadykov
ananyananar
melissa-80