ghcfgnyhvjt
17.05.2022 13:53

Программы с условным оператором Опре­де­ли­те зна­че­ние пе­ре­мен­ной с после вы­пол­не­ния сле­ду­ю­ще­го фраг­мен­та про­грам­мы (за­пи­сан­но­го ниже на раз­ных язы­ках про­грам­ми­ро­ва­ния). ответ за­пи­ши­те в виде це­ло­го числа.
 
Бэй­сикАл­го­рит­ми­че­ский язык

а = 50 b = 6 а = а * 3 / b IF а > b THEN     с = а + 5 * b ELSE     с = а - 5 * b END IF

a : = 50 b : = 6 a : = a * 3 / b если a > b     TO с : = a + 5 * b иначе с := a - 5 * b все

Си++Пас­каль

a =50; b = 6; a = a * 3 / b if (a > b)     с = a + 5 * b; else     с = a - 5 * b;

a : = 50 ; b : = 6; a : = a * 3 / b if a > b then     с = a + 5 * b else     с = a - 5 * b;

Python

a = 50
b = 6
a = a * 3 / b
if a > b:
    c = a + 5 * b
else:
    c = a - 5 * b

 

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Shaurma021
22.09.2021 14:05
На Java:

class SearchPalin{
 public static void main(String args[]){
  String palinString = new java.util.Scanner(System.in).nextLine();
  System.out.print("\nПалиндром(-ы):\n  ");
  for(int wordStart = 0, wordEnd = 0; wordEnd<palinString.length(); wordEnd++)
   if(wordEnd+1==palinString.length() || palinString.charAt(wordEnd+1)==' '){
 String wordBeginning = "", wordEnding = "";
 for(int wordBe = wordStart;wordBe<wordEnd+1;wordBe++)wordBeginning+=palinString.charAt(wordBe);
 for(int wordEn = wordEnd;wordStart-1<wordEn;wordEn--)wordEnding+=palinString.charAt(wordEn);
 if(wordBeginning.equals(wordEnding)){
  for(int palinWord = wordStart;palinWord<=wordEnd;palinWord++)System.out.print(palinString.charAt(palinWord));
  System.out.print("\n  ");
 } wordStart = wordEnd+2;
   }
 }
}
0,0(0 оценок)
Ответ:
Danilalmaz
22.09.2021 14:05
// PascalABC.NET 3.0, сборка 1139 от 10.01.2016
begin
  var s:=ReadLnString('Вводите:');
  s.ToWords.Where(x->x=ReverseString(x)).PrintLn;
end.

Тестовое решение:
Вводите: дед иван достал наган и пошел с ним в шалаш
дед наган и с в шалаш

Вариант, если исключить однобуквенные:

// PascalABC.NET 3.0, сборка 1139 от 10.01.2016
begin
  var s:=ReadLnString('Вводите:');
  s.ToWords.Where(x->x=ReverseString(x)).
    Where(x->x.Length>1).PrintLn;
end.

Тестовое решение:
Вводите: дед иван достал наган и пошел с ним в шалаш
дед наган шалаш
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота