Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
Прочтите прежде чем задавать вопрос!1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Помогите решить |
| KucerMD |
Сообщение
#1
|
|
Группа: Пользователи Сообщений: 8 Пол: Мужской Реальное имя: Андрей Репутация:  0   |
1.. Дана скорость движения автомобиля. За какое время он проедет 300 километров.
2.Составить программу определяющую лежит ли точка с координатами x y на окружности радиуса R, центр окружности лежит в начале координат. 3.Дано n количество чисел, подсчитать среди них количество положительных и отрицательных. 4С помощью цикла Repeat написать программу суммы квадратов не чётных чисел от 1 до 300. |
   |
 
|
  |
| KucerMD |
Сообщение
#2
|
|
Группа: Пользователи Сообщений: 8 Пол: Мужской Реальное имя: Андрей Репутация: 0 |
Нам так учитель дал.
|
|
|
|
KucerMD Помогите решить 26.04.2010 20:27
TarasBer Тут нюанс есть только во втором задании: если числ… 26.04.2010 20:35 Ozzя
Согласен. Хотя бы 1-ю? Там в 3 строки укладываетс… 26.04.2010 21:07 KucerMD Вот например 3.
If a/2 div 2 then writeln ('po… 26.04.2010 21:19 Ozzя Нет.
if odd(a) then
writeln ('necetnoe… 26.04.2010 21:21
KucerMD
Нет.
if odd(a) then
writeln ('necetnoe… 26.04.2010 21:25 Ozzя
Ты сам-то задание прочитал? Тебе в 3-м нужно - … 26.04.2010 21:29 KucerMD А 2-ая правильно?
c:=a/2 26.04.2010 22:09 Ozzя Нет.
if sqr(x)+sqr(y)=sqr® then
WriteLn(… 26.04.2010 22:12 KucerMD
Нет.
if sqr(x)+sqr(y)=sqr® then
WriteLn('Ле… 27.04.2010 0:20 Гость 1. а в чем проблема? t=s/v. Просто введи скорость … 27.04.2010 0:52 |
|
Текстовая версия | 6.11.2025 4:29 |
