• Добро пожаловать на компьютерный форум Tehnari.ru. Здесь разбираемся с проблемами ПК и ноутбуков: Windows, драйверы, «железо», сборка и апгрейд, софт и безопасность. Форум работает много лет, сейчас он переехал на новый движок, но старые темы и аккаунты мы постарались сохранить максимально аккуратно.

    Форум не связан с магазинами и сервисами – мы ничего не продаём и не даём «рекламу под видом совета». Отвечают обычные участники и модераторы, которые следят за порядком и качеством подсказок.

    Если вы у нас впервые, загляните на страницу о форуме и правила – там коротко описано, как задать вопрос так, чтобы быстро получить ответ. Чтобы создавать темы и писать сообщения, сначала зарегистрируйтесь, а затем войдите под своим логином.

    Не знаете, с чего начать? Создайте тему с описанием проблемы – подскажем и при необходимости перенесём её в подходящий раздел.
    Задать вопрос Новые сообщения Как правильно спросить
    Если пришли по старой ссылке со старого Tehnari.ru – вы на нужном месте, просто продолжайте обсуждение.

Недавнее содержимое от Стася

  1. С

    Задача о счастливых числах

    Ну эти моменты с преподавателем выясним, если что) зато весело будет, глядишь, он про остальные вопросы и не вспомнит:))
  2. С

    Задача о счастливых числах

    Ну это-то уже не сложно:) А вот это уже проблема)
  3. С

    Задача о счастливых числах

    Юхуу, вроде все получилось:) еще раз спасибо A[2]:=y; A[1]:=x; A[3]:=z; c:=0; for x:=0 to 9 do for y:=0 to 9 do for z:=0 to 9 do if x+y+z=13 then inc(c); writeln(c) 75 таких)
  4. С

    Задача о счастливых числах

    Спасибо)) Сейчас попробую)
  5. С

    Задача о счастливых числах

    Задача о счастливых числах Вот такая задачка, нужно решить в Паскале Я начала делать через массивы, но абсолютно не представляю, как найти количество счастливых чисел, с суммой цифр 13. Помогите пожалуйста Const n=6; vect_min = 0; vect_max = 9; Var i, s, s1, s2 : Integer...
  6. С

    Помогите исправить, пожалуйста

    ага, это осталось еще от предыдущих неудачных попыток, я вчера убрала ее У нас как раз такой случай, просят вставлять CRT - все-таки программирование не является профильным предметом у нас и дается в очень сжатые сроки Спасибо большое за помощь) было бы здорово, если бы все преподаватели так...
  7. С

    Помогите исправить, пожалуйста

    А в моем задании нужно было между i_min_2 и i_max_2 перевернуть элементы
  8. С

    Помогите исправить, пожалуйста

    До прошлой недели я с программированием не сталкивалась особо, поэтому по примеру пыталась сделать:
  9. С

    Помогите исправить, пожалуйста

    Спасибо огромное! Теперь понятно) А можете еще вот этот момент посмотреть? begin If i_min_2<i_max_2 then Begin i1:=i_min_2; i2:=i_max_2; End Else Begin i2:=i_min_2; i1:=i_max_2; End; a:=i2-i1; m:= a Div 2; For i:=i1 To m Do Begin k:= vector[i1+i]...
  10. С

    Помогите исправить, пожалуйста

    Program Variant_5; Uses Crt; Const n = 10; {задание размера вектора именованной константой} Var i, v_min, v_max,i_max, max,i_min, min, i_max_2, max_2, i_min_2, min_2, k, m, a, i1, i2 : Integer; vector : Array [1..n] Of Integer; Begin Randomize; {запуск генератора случайных чисел}...
  11. С

    Помогите исправить, пожалуйста

    Помогите исправить, пожалуйста Программа, которая у меня получилась то нормально работает, то вместо второго максимального по значению элемента находит просто максимальный( всю голову сломала уже Вот, что получилось:
Назад
Сверху