М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
graincop
graincop
05.05.2020 22:13 •  Информатика

Пупкин вася съедает ежедневно на 20 конфет больше, чем в предыдущий день, и ещё 2 конфеты. выведите на экран,через сколько дней количество съеденных конфет превысит 100, если в первый день съедено 12 конфет

👇
Ответ:
Sashska13me
Sashska13me
05.05.2020
Var a,b,c:integer;
begin
 a:=12;
 b:=1;
 while a<100 do begin
  a:=a+20+2;
  b:=b+1; 
  end;
 writeln('Через ',b,' дней Вася съест ',a,' конфет');
end.
4,5(94 оценок)
Открыть все ответы
Ответ:
profi1212
profi1212
05.05.2020

#include - подключение библиотеки.

using namespace std; - объявление пространства имен

void swap(int x, int y, int z) - определение функции swap, которая ничего не возвращает, с принимаемыми аргументами типа int. Служит для обмена значений

{} - операторные скобки

int temp - объявление локальной переменной temp.

if(x > y ) - Если x > y, мы меняем значения x и y. temp - промежуточная переменная для хранения значения.

if(x > z) - Если x > z, мы меняем значения x и z. temp - промежуточная переменная для хранения значения.

if(y > z) - Если y > z, мы меняем значения y и z. temp - промежуточная переменная для хранения значения.

cout << x << " " << y << " " << z << "\n"; - вывод переменных x y z через пробел. \n - перевод каретки на новую строку.

}

int main() - главная функция, которая начинает свое выполнение при запуске

{

int x = 2, y = 6, z = 5; - определение переменных x y z

swap(x, y, z); - вызываем функцию и передаем ей значения x y z

system("pause >> null"); - передача команды "pause >> null" командному процессору. Тормозим выполнение программы. >> null означает, что не будет ничего написано. (Без этого будет писать, в роде: Для продолжения нажмите")

return 0; - возвращаемое значение

}

4,4(77 оценок)
Ответ:
fariii046
fariii046
05.05.2020
Программа подсчитывает количество слов длиной в 5 символов во введенном тексте. Но работать она не будет, есть ошибки:
1. Встречен repeat но нет until
2. Есть 3 begin, но только 2 end
3. Константа N лишняя. Нигде в программе не используется
После исправления ошибок программа с краткими комментариями будет выглядеть так:

program Zinaida;
var
  i, k: integer;
  inString: String;
  isize, count: integer;
begin
  write('String: ');
  readln(inString); //ввод текста
  k := length(instring); //длина текста
  if instring[k] = '.' then dec(k);
  //цикл для поиска пробелов и
  //слов с длиной 5 символов
  for i := 1 to k do
  begin
    if instring[i] <> ' ' then inc(isize);
    if (instring[i] = ' ') or (i = k) then
    begin
    //если длина слова = 5 то увеличиваем count на 1
      if isize = 5 then inc(count);
      isize := 0;
    end;
  end;
  write('Количество слов из пяти букв', count);
end.
4,7(52 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ