Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Turbo Pascal Вычислить значение выражения с точностью ε Народ помогиче немного, сделал программу но что то сомневаюсь что правильно, укажите ошибку, заранее спс. program practc1; uses crt; var zn,x:real; s1,ch,y:real; https://www.cyberforum.ru/ turbo-pascal/ thread365980.html Turbo Pascal Построение графиков функций.
Дана программа: Program graph51; uses Dos,Crt,Graph,Graph0; var x,y :integer; x_ekr, y_ekr :integer; begin Init('c:\tp70\bgi'); SetColor(Green);
Turbo Pascal массив https://www.cyberforum.ru/ turbo-pascal/ thread365961.html
помогите решить задачку))
Turbo Pascal Выделить из строки название последнего каталога Дана строка, содержащая полное имя файла. Выделить из строки название последнего каталога (без символов "\"). Если файл содержится в корневом каталоге, то вывести символ "\". https://www.cyberforum.ru/ turbo-pascal/ thread365960.html
Найти число, в двоичной записи которого максимальное число Turbo Pascal
Среди простых чисел, не превосходящих n, найти такое, в двоичной записи которого максимальное число единиц.
Turbo Pascal Определить, какая цифра находится в позиции числовой последовательности Определить, какая цифра находится в позиции числовой последовательности. 101112131415...979899-подряд выписаны все двузначные числа. https://www.cyberforum.ru/ turbo-pascal/ thread365952.html
Turbo Pascal Графика Нарисуйте на экране несколько цветков, различных по окраске, размерам, количеству лепестков. https://www.cyberforum.ru/ turbo-pascal/ thread365948.html Turbo Pascal Определить имеют ли они одно значение
Задан алфавит из трех букв a, b, c. С помощью данного алфавита составлены два слова. Определить имеют ли они одно значение. Известно, что при замене ab на ba, ac на ca и cb на bc значение слов не меняется.
Turbo Pascal Графика Смоделируйте на экране движение "шарика". а)по окружности б)по спирали https://www.cyberforum.ru/ turbo-pascal/ thread365944.html Turbo Pascal Вычисление определенных интегралов. Пожалуйста помогите!!!! HELP!!!! Помогите пожалуйста составить программу повычислению определенных интегралов. https://www.cyberforum.ru/ turbo-pascal/ thread365938.html
Могут ли A и B , быть катетами прямоугольного треугольника. Turbo Pascal
Ввести три вещественных числа A,B,C. Могут ли A и B , быть катетами прямоугольного треугольника.
Turbo Pascal Вывести все целые числа, расположенные между заданными https://www.cyberforum.ru/ turbo-pascal/ thread365933.html
Ребята нужно не большая помощь ... нужно решить задачу с операторами цикла for while repeat. я через for сделал нужно теперь через while repeat. даны два целых числа А и В (A<B). Вывести все целые числа, расположенные между данными числами (включая сами эти числа), в порядке их возрастания, а также количество N этих чисел. Program sr1; var a, b, i, cnt: integer; begin write('Vvedite A:...
0 / 0 / 0
Регистрация: 09.10.2011
Сообщений: 26
0

Верно ли, что введенное число содержит m цифр «5» - Turbo Pascal - Ответ 2067735

13.10.2011, 21:34. Показов 844. Ответов 2
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
написал программу, но она не работает правильно, хотя сделал думаю верно
вот условие : 1. С клавиатуры вводится натуральное число N, содержащее не более 6 цифр. Верно ли , что оно содержит m цифр «5»? Число m запросить с клавиатуры.


Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
program practc1;
uses crt;
   var n: longint;
       k:integer;
       m:byte;
 
BEGIN
k:=0;
  write('Enter N =  ');readln(n);
  while N>0 do
 begin
  N:=N div 10;
  k:=k+1;
  write('Chislo soderjit M cifr?   M =  ');readln(m);
  if k=m then
    writeln('VERNO, chislo soderjit M cifr')
  else
    writeln('NEVERNO, chislo ne soderjit M cifr')
 end;
 end.


Вернуться к обсуждению:
Верно ли, что введенное число содержит m цифр «5» Turbo Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
13.10.2011, 21:34
Готовые ответы и решения:

Дано натуральное n-значное число P. Верно ли что число содержит три одинаковые цифры.
Люди помогите - нужно програмку написать с помощью процедур и функций - собственно вот: Дано...

Верно ли утверждение, что введенное Вами целое число является нечетным
Составьте программу, проверяющую, верно ли утверждение, что введенное Вами целое число является...

Верно ли утверждение, что введенное Вами целое число является нечетным
Помогите составить программу, проверяющую, верно ли утверждение, что введенное Вами целое число...

Проверить, верно ли утверждение, что введенное целое число делится без остатка на 3
Составьте программу, проверяющую, верно ли утверждение, что введенное вами целое число делится без...

2
13.10.2011, 21:34
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
13.10.2011, 21:34
Помогаю со студенческими работами здесь

Верно ли утверждение, что введенное вами целое число делится без остатка на 3
77. Валя и Вера на своем садовом участке собрали А кг клубники. Из них В кг собрала Вера. Кто из...

Верно ли, что число содержит три одинаковых цифры
Надо написать программу к этой задаче : Дано натурально число n(n &lt;(или равно)9999).Учитывая все...

Дано натуральное число, верно ли что цифр а больше чем цифр б
Дано натуральное число, верно ли что цифр а больше чем цифр б??(через div и mod )как сделать?

Составить программу, проверяющую, верно ли утверждение,что введенное вами целое число является четным.
Здравствуйте, помогите составить программу, проверяющую, верно ли утверждение,что введенное вами...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru