Составить программу для вычисления значения функции, на Turbo Basic?
Составить программу для вычисления значения функции, на Turbo Basic.
Напишите программы в Turbo Pascal?
Напишите программы в Turbo Pascal.
Напишите программу в Turbo Pascal?
Напишите программу в Turbo Pascal.
Спасибо!
Turbo Pascal?
Turbo Pascal!
Составить программу для вычисления значение функции : y = {x ^ 2, если х< ; 0 x - 5, если х> ; 5 0, если 0≤х≤5.
Составить программу на Turbo Pascal : вычислить выражение [(2а + 4Ь) + 1] / (а + 2Ь + 4)?
Составить программу на Turbo Pascal : вычислить выражение [(2а + 4Ь) + 1] / (а + 2Ь + 4).
Напишите программу которая запрашивает значение двух переменных и выводит их сумму ?
Напишите программу которая запрашивает значение двух переменных и выводит их сумму .
На паскаль Pascal Turbo.
Помогите составить программу очень срочно?
Помогите составить программу очень срочно!
Pascal TURBO.
Структура программы на языке turbo pascal?
Структура программы на языке turbo pascal.
Написать программу вычисления значений функции в заданных точках (Turbo Pascal) Очень нужно?
Написать программу вычисления значений функции в заданных точках (Turbo Pascal) Очень нужно.
Написать программу вычисления значений функции в заданных точках (Turbo Pascal) Очень нужно?
Написать программу вычисления значений функции в заданных точках (Turbo Pascal) Очень нужно.
Вы открыли страницу вопроса Turbo Pascal?. Он относится к категории Информатика. Уровень сложности вопроса – для учащихся 5 - 9 классов. Удобный и простой интерфейс сайта поможет найти максимально исчерпывающие ответы по интересующей теме. Чтобы получить наиболее развернутый ответ, можно просмотреть другие, похожие вопросы в категории Информатика, воспользовавшись поисковой системой, или ознакомиться с ответами других пользователей. Для расширения границ поиска создайте новый вопрос, используя ключевые слова. Введите его в строку, нажав кнопку вверху.
Var k1, k2, k3, y : integer ;
begin
write('k1 = ') ;
readln(k1) ;
if k1> ; 5
then y : = 1
else if k1 = 5 then begin write('k2 = ') ; readln(k2) ; y : = k1 * k2 ; end else begin write('k3 = ') ; readln(k3) ; y : = k3 * k3 ; end ;
writeln('y = ', y) ;
end.
Пример :
k1 = 3
k3 = 7
y = 49.