Ivanova567
25.05.2021 18:46

Написать ЭССЕ на тему "я и мед. информатика" 1-2 стр (информатика)​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Bonyashechka
22.07.2021 12:08
Печать документов и ФШ))про Макса вообще молчу имя ему даже другое дали. Школьные задания просто убивают.. По делу.Для работы в средах растровой, векторной и тем более в моделировании понадобится дискретная видео карта с объёмом памяти не менее 512 МБ, а для моделирования понадобится ещё и плюс поддержка шейдеров 3 версии и выше плюс ко всему этому ещё добавляется технология PhysiX, дабы макс не тормозило, хотя и не уверен, что с этими минимумами что-то там вообще будет нормально работать, ну да, дальше. Минимум 2 ГБ оперативной памяти, желательно DDR3. Процессор желательно не ниже характеристик intel core 2 duo или аналог на AMD, а то пентиумы уже не тащат. 180 ГБ HDD. Ну чем больше, тем лучше. Ну ещес: DVD,CD - дисководы Принтер, очень важный элемент, без нэго ничего не работает. Думаю все это укладывается в 25 тысяч.
0,0(0 оценок)
Ответ:
cratospo234
23.09.2021 21:08
Var so,sr,c:string;
t,k:integer;
begin;
readln(so);
t:=0;
for i:=1 to length(so) do
sr:=sr+'*';
while t<>6 do
begin;
readln(c);
if length(c)<>1 then
 begin;
  writeln('Только одна буква!');
  continue;
 end;
if pos(c,so)<>0 then
 begin;
 for i:=1 to length(so) do
   if so[i]=c then
   begin;
     delete(sr,i,1);
     insert(c,sr,i);
   end;
 writeln(sr);
 writeln('Осталось ',6-t,' попыток');
 end
 else
 begin;
 writeln(sr);
 inc(t);
 writeln('Осталось ',6-t,' попыток');
 end;
 if so=sr then break;
end;
if so=sr then writeln('Вы выиграли') else writeln('Вы проиграли');
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота