Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal ABC Сумма квадратов всех чисел от 1 до N https://www.cyberforum.ru/ pascalabc/ thread697311.html 1. Составьте программу, вычисляющую сумму квадратов всех чисел от 1 до N.	Pascal ABC Определить, можно ли, переставив члены данной последовательности, получить геометрическую прогрессию определить можно ли переставив члены данной последовательности получить геометрическую прогрессию
Pascal ABC Определить, принадлежит ли точка с координатами (х,у) заштрихованной области https://www.cyberforum.ru/ pascalabc/ thread697212.html	Pascal ABC Подсчет суммы всех элементов в массиве помогите плииззз не могу разобраться дано масивa A составить программу подсчета суммы всех Элементов, находящийся между элементами A и A https://www.cyberforum.ru/ pascalabc/ thread697196.html
Дано трехзначное число. Найти число, полученное при прочтении его цифр справа налево Pascal ABC Помогите сделать 3 задачи по Паскалю с блок-схемами. 2.Дано трехзначное число.Найти число, полученное при прочтении его цифр справа налево.	Pascal ABC Даны три числа, вывести на экран те, которые не принадлежат диапазону (-3,8;1,8) Помогите сделать 3 задачи по Паскалю с блок-схемами. 3.Даны три вещественных числа, вывести на экран те из них, которые не принадлежат диапазону (-3,8;1,8). https://www.cyberforum.ru/ pascalabc/ thread697164.html
Pascal ABC Определить плотность население в государстве. https://www.cyberforum.ru/ pascalabc/ thread697159.html Помогите сделать 3 задачи по Паскалю с блок-схемами. 1. Известно количество жителей в государстве и площадь его территории. Определить плотность население в этом государстве. илья17, в следующий раз я вашу тему снова разделю, конечно.. Но и карточку выдам - за нарушение правил форума.	Составить программу, печатающую строку: «ABBCDD…Z» Pascal ABC Помогите пожалуйста составить программу, печатающую строку: «ABBCDD…Z».
Pascal ABC Алгоритм нахождения квадратного корня из положительного числа x https://www.cyberforum.ru/ pascalabc/ thread697129.html можно представить следующей рекуррентной последовательностью: y0 = (x+1)/2 yi = (yi-1 + x/yi-1) (формула Герона Александрийского). При заданном x определить n-ое приближение его квадратного корня. Помогите пожалуйста, догнать не могу как делается. Заранее благодарен!	Pascal ABC Неправильно находит МАХ https://www.cyberforum.ru/ pascalabc/ thread697075.html Нужно вывести максимальный элемент для 3 матриц и его порядковый номер. Читать с файла. uses crt; const m=3; n=4; type mas=array of integer; var i,j,maxi,maxj,mini,minj:integer; var maxz,maxv,maxg:mas; var masz,masv,masg,rez:text; max1:integer;
Pascal ABC Определить количество положительных и отрицательных элементов матрицы Дана матрица А, содержащая положительные и отрицательные элементы. 1) Определить в какой строке более одного отрицательного элемента и заменить элементы этой строки числом 5. Затем вывести матрицу. 2) Определить количество положительных и отрицательных элементов матрицы и записать их в одномерный массив. Вывести массив. как сделать эти условия в паскале.. не получается у меня воще...:cry:...	Pascal ABC Ошибка в коде https://www.cyberforum.ru/ pascalabc/ thread697049.html Всем привет. нужна помощь. не могу в коде найти ошибку.. Задача: Дан двумерный массив,удалить из него первую из строк,сумма элементов которых не превышает некоторое заданное число Код: program mas1; const SS=123; var a: array of integer; i,j: integer;

ermolay

3451 / 2389 / 2135

Регистрация: 04.12.2011

Сообщений: 3,966

14.11.2012, 13:42

Выяснить, что получится в результате выполнения программы - Pascal ABC - Ответ 3697008

14.11.2012, 13:42. Показов 2030. Ответов 3

Метки (Все метки)

Сообщение было отмечено Памирыч как решение

Решение

Если в 9-й строке не C[i] , а B[i], и программа выглядит так:

Pascal

program Variant3; 
 
const
  n = 17;
 
var
  B: Array[1..n] Of Integer;
  i: Byte; p: Integer;
 
begin
  p := 0;
  for i := 1 To n Do 
  begin
    B[i] := -35 + Random(121);
    if B[i] Mod 10 = 0 Then p := p + 1;
  end;
  Writeln(p); 
end.

то она выводит количество элементов, заканчивающихся нулем
ключевая строчка эта

Pascal

1	if B[i] Mod 10 = 0 Then p := p + 1;

Вернуться к обсуждению:
Выяснить, что получится в результате выполнения программы Pascal ABC

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

14.11.2012, 13:42

Готовые ответы и решения:

Что получится в результате выполнения программы?
Что получится в результате выполнения программы? Program Variant2; Const n=10; Type...

Определить, какая числовая последовательность получится в результате выполнения 3 итерации во внутреннем цикле
1. Какая числовая последовательность получится в результате выполнения 3 итерации во внутреннем...

Матрица и циклы: Что будет выведено на экран, в результате выполнения программы?
Здравствуйте. Подскажите, пожвлуйста, мне в чем я не прав. Задание заключается в следующем: Что...

Алгоритм и алгоритмизация: Определите, что будет напечатано в результате выполнения фрагмента программы
Помогитее решить Определите, что будет напечатано в результате выполнения фрагмента программы: ar...

	14.11.2012, 13:42

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

14.11.2012, 13:42

Помогаю со студенческими работами здесь

Определить, что будет напечатано в результате выполнения программы
var s, k; integer; begin s:=40 for k:=1 to 7 do s:=s-3 write(s); end.

Что будет напечатано на экране в результате выполнения программы?
помогите пожалуйста .что будет напечатано на экране в результате выполнения программы ? так же...

Что будет напечатано в результате выполнения следующего фрагмента программы?
x := -3.1; y := 1; If (x < 0) And (y < 0) Then begin x := -x; y := -y; end Else If Not ((x...

Укажите, что будет напечатано в результате выполнения следующей программы
Укажите, что будет напечатано в результате выполнения следующей программы: Var a:array of integer;...

Наверх