Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.59/64: Рейтинг темы: голосов - 64, средняя оценка - 4.59
0 / 0 / 0
Регистрация: 04.03.2012
Сообщений: 25

Продемонстрировать отражение и преломление света на плоской поверхности (угол падения вводится с клавиатуры)

04.03.2012, 12:26. Показов 11743. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
составить программу в паскале, которая демонстрирует отражение и преломление света на плоской поверхности (угол падения вводится с клавиатуры)
Помогите пожалуйста составить такую программу в Paskal ABC
Миниатюры
Продемонстрировать отражение и преломление света на плоской поверхности (угол падения вводится с клавиатуры)  
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
04.03.2012, 12:26
Ответы с готовыми решениями:

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

Нарисовать движение и преломление луча света
нужно нарисовать вот это в паскале и нужно чтобы луч света двигался

Ошибка в программе поиска угла преломления по данному
Помогите пожалуйста мне устранить ошибку в коде: uses crt,GraphABC; var a:longint; ...

1
71 / 71 / 72
Регистрация: 18.01.2012
Сообщений: 132
05.03.2012, 02:08
Лучший ответ Сообщение было отмечено sivakov как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
uses crt,GraphABC;
var
 a:longint;
 ug:real;
 x,y:longint;
begin
 read(a);{вводим угол}
 line(0,300,640,300);{горизонт}
 ug:=a/180;{перевод в радианы}
 y:=300-320*(sin(ug))/(cos(ug));{подсчет высоты}
 line(320,300,640,y);{левая и правая части}
 line(320,300,0,y);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
05.03.2012, 02:08
Помогаю со студенческими работами здесь

Ошибка в программе поиска угла преломления по данному углу
Помогите пожалуйста мне устранить ошибку в коде: uses crt,GraphABC; var a:longint; ...

Определить скорость во время свободного падения через 1, 1.5 и 3 секунды после начала падения с заданной высоты
высота Исааковского собора в Питере 101,8.Определить,скорость во время свободного падения через 1,...

Поворот объекта относительно заданной точки на заданный угол, а затем - отражение относительно заданной прямой
напишите программу,которая осуществляет поворот объекта относительно заданной точки на заданный...

Вводится число N. Определить количевство одинаковых и неодинак Вводится число N . Определить, все ли цыфры разные; естли нет, тоговых цыфр в числе.
Задача №15 Вводится число N . Определить, все ли цыфры разные; естли нет, тогда сколько...

вводится число, вводится степень и надо узнать, соответствует ли это число данной степени
Series26. Даны целые числа K, N и набор из N вещественных чисел: A1, A2, …, AN. Вывести K-e...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru