Перевод паскаля в бейсик

Перевести программу на Pascal в Basic

Перевести программу на Pascal в Basic
Само задание выглядит так Числа Фибоначчи F определяются по формулам F0=F1=1, Fi=Fi-1+Fi-2 при i=.

Перевести программу на Basic в Turbo Pascal
С книжки дьяконова Есть код на Basic нужно перевсти его в турбо паскаль, очень нужна помощь, или.

Перевести программу на BASIC на язык pascal
DIM a(25) RANDOMIZE TIMER PRINT «massiv» FOR i = 1 TO 25 a(i) = INT(RND * 50) PRINT a(i);.

Нужно перевести программу с Basic на Pascal
Пожалуйста помогите перевести программу с Basic на Pascal

Привожу условия задачи для проверки корректного решения.
Составить блок-схему алгоритма и программу на языке Basik для решения задачи, включающей ввод исходных данных, организацию цикла, и выбора по заданному условию. Значение параметра задачи «А» соответствует последней цифре шифра зачетной книжки плюс 5, параметра «В» предпоследней цифре шифра плюс 12. Вариант выбирается по последней цифре шифра зачетной книжки.Функция

Расчетные выражения
1) y=e^(3*B)+cos(a*x)
2) (A-B)*Ln(X)
Условия выбора
1) x = 3
Интервал изменения аргумента
х=1-5
От 1 до 5
Шаг
0,5

Добавлено через 47 секунд

Привожу условия задачи для проверки корректного решения.
Составить блок-схему алгоритма и программу на языке Basik для решения задачи, включающей ввод исходных данных, организацию цикла, и выбора по заданному условию. Значение параметра задачи «А» соответствует последней цифре шифра зачетной книжки плюс 5, параметра «В» предпоследней цифре шифра плюс 12. Вариант выбирается по последней цифре шифра зачетной книжки.Функция

Расчетные выражения
1) y=e^(3*B)+cos(a*x)
2) (A-B)*Ln(X)
Условия выбора
1) x = 3
Интервал изменения аргумента
х=1-5
От 1 до 5
Шаг
0,5

Добавлено через 2 часа 3 минуты
прошу считать тему закрытой

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Перевести с Basic на Pascal
Пожалуйста, помогите перевести программу Basic на Pascal. Буду очень благодарна)))

Перевести с Basic на Pascal
Был бы очень благодарен, если бы помогли решить 3 задачи, а если быть более точным, то есть.

Необходимо перевести программу с Pascal ABC на free pascal
var a, factorial:longint; const c:array of char= (‘0′,’1’); var res:string; d:0..1; k.

Источник

Перевод паскаля в бейсик

Группа: Пользователи
Сообщений: 6
Пол: Женский

Репутация: 0

переменные объявляются так
Dim x, s, z, t As Double
Dim k, i, n As Integer

Begin тоже не пишется и do не пишется.
Не могу найти как прописывается (inc), writelen как print что-то не получается.

На Basic-е проба пера:

Sub Algoritm()
Dim x, s, z, t As Double
Dim k, i, n As Integer
i = 1
z = 1
s = 0
n = 0
While x / z > 0.0001
t = s
s = s + x / z

i = i + 1
z = 1
For k = 1 To i
z = z * k
Next
Print
End Sub

inc(n);
переводится как
n = n+1

Источник

Оцените статью
( Пока оценок нет )
Поделиться с друзьями
Uchenik.top - научные работы и подготовка
0 0 голоса
Article Rating
Подписаться
Уведомить о
guest
0 Комментарий
Старые
Новые Популярные
Межтекстовые Отзывы
Посмотреть все комментарии
М
Тэги, уважаемая Kenzo, тэги! Правила раздела, п.1 (возденьте очи) и Правила Форума, п.5
Lapp

Гуру

Группа: Пользователи
Сообщений: 1 168
Пол: Мужской
Реальное имя: Сергей Андрианов

Репутация: 28