Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Определить, после какого дня суммарный пробег лыжника за все дни превысит 200 км Спортсмен-лыжник начал тренировки, пробежав в первый день 10 км. Каждый следующий день он увеличивал длину пробега предыдущего дня (р вещественное 0<р<50) по данному р определить после какого дня... https://www.cyberforum.ru/ pascal/ thread201982.html сколько раз меняется знак в данной последовательности чисел Pascal
задан массив действительных чисел .Определить сколько раз меняется знак в данной последовательности чисел,запомнить номера позиции в которых происходит смена знака.
Pascal Работа с массивом. найти количество элементов мвссива, которые больше 50. sos!!!! удалить из массива заданный элемент. сортировать массив по убыванию. пожалуста, решите. мне срочно надо(((... https://www.cyberforum.ru/ pascal/ thread201970.html Pascal Сформировать квадратную матрицу по образцу https://www.cyberforum.ru/ pascal/ thread201963.html
Вот такую матрицу 10...01 01...10 ... .. .. . .. .. ... 01...10 10...01
Pascal Антифакториал
Здраствуйте! Нужно задачку бы решить. Помогите плз. N! (читается эн-факториал) представляет собой произведение всех натуральных чисел от 1 до N. Во входном файле записано значение N! Для...
Pascal Подсчитать, сколько букв 'о' стоит в заданном слове на чётных позициях https://www.cyberforum.ru/ pascal/ thread201947.html
написать программу,которая определяет сколько букв 'о' стоит в заданном слове на чётных позициях.
Pascal Удалить все буквы слова,совпадающие с его последней буквой написать программу,удаляющую все буквы слова,совпадающие с его последней буквой. https://www.cyberforum.ru/ pascal/ thread201946.html Pascal Подсчитать стоимость телеграммы, текст которой вводится с клавиатуры
написать программу,подсчитывающую стоимость телеграммы,текст которой вводится с клавиатуры.
Pascal написать рекурсивную процедуру https://www.cyberforum.ru/ pascal/ thread201933.html
Написать рекурсивную процедуру, которая считывает вводимые с клавиатуры числа до тех пор, пока не будет обнаружена единица. Затем введенные числа распечатываются в обратном порядке.
Pascal В каждом слове текста заменить "а" на букву "е", если "а" стоит на четном месте, и заменить букву "б" на сочетание "ак", если "б" стоит на нечетном https://www.cyberforum.ru/ pascal/ thread201925.html
В каждом слове текста заменить "а" на букву "е", если "а" стоит на четном месте, и заменить букву "б" на сочетание "ак", если "б" стоит на нечетном месте. По словом "текст" понимается строка...
Pascal записи(record)
помогите с решением задания...Я начал делать но что то не до конца понял (ибо препод нормально не объяснил...надеюсь на вашу помощь) задание заключается в следующем 1)Сделать запись и записать ее в...
Pascal Одномерные и двумерные массивы https://www.cyberforum.ru/ pascal/ thread201895.html
Всем доброго времени суток! Помогите решить две задачи: 1. Даны натуральное n, действительные числа a1, … , an, b1, … , bn. Преобразовать b1, … , bn по правилу: если ai < 0, то bi увеличить в 10...
Заблокирован
02.12.2010, 14:44 0

ПРОГРАММЫ ЦИКЛИЧЕСКОЙ СТРУКТУРЫ (Подскажите, пожалуйста!! не могу уже понять ее...) - Pascal - Ответ 1162034

02.12.2010, 14:44. Показов 537. Ответов 4
Метки (Все метки)

Ответ

s:=0;
for i:=1 to 5 do
begin
readln(a);
s:=s+a;
writeln('Введено чисел',i);
writeln('S=',s);
writeln('Ср.ар.=',s/i);
end;

Вернуться к обсуждению:
ПРОГРАММЫ ЦИКЛИЧЕСКОЙ СТРУКТУРЫ (Подскажите, пожалуйста!! не могу уже понять ее...) Pascal
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.12.2010, 14:44
Готовые ответы и решения:

подскажите пожалуйста сам уже не могу )
var xa,ya,xb,yb,xc,yc,i,j,k,l,f,g,a,b,c,A1,B1,C1,ha,hb,hc,r,R1,S1, P1,s,p: real; ArcCos,z,x,n:...

Не могу понять в чем ошибка. Подскажите, пожалуйста!
Начал учиться разрабатывать приложения под андройд. Хочу напиать прогу с шифрованием XOR. В...

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

Программы циклической структуры
Напечатать таблицу перевода температуры из градусов по шкале Цельсия (С) в градусы по шкале...

4
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.12.2010, 14:44

Программы циклической структуры
Вводится N чисел. Вывести на экран те числа, делителем которых яв- ляется целое число А. {как...

Программы разветвляющейся и циклической структуры
Даны: натуральное число N, массив действительных чисел Y(N). Найти Z(1)+Z(2)+...+Z(N), где ...

Программы циклической структуры (примитив) - вычислить сумму
Задание: Public Class Form1 Private Sub Button1_Click() Dim k, n, s As Integer...

[("rc", rc) for rc in product(range(N), range(N)] подскажите пожалуйста что означает код. Не могу понять
подскажите пожалуйста что означает код. Не могу понять

Программа уже написана, а понять не могу(
Дан двумерный массив n*m, заполненный случайными числами. Определить, есть ли в данном массиве...

Уже неделю не могу понять и справиться с задачей
Вводится натуральное число N, а затем последовательность из N целых чисел. Определить, является ли...

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