ПАСКАЛЬ.
5-9 класс
|
Дано действительное число K вида nnn.ddd ( по 3 цифровых разряда в дробной и целой частях). Поменяйте местами дробную и целую часть числа и выведете полученное новое значение.
ПАСКАЛЬ.
var
a, b: real;
ip, fp: integer;
begin
Write('Введите число в формате nnn.nnn ->');
Readln(a);
ip := trunc(a);
fp := trunc(1000 * (a - ip));
b := fp + ip / 1000;
writeln('Результат: ', b)
end.
Тестовое решение:
Введите число в формате nnn.nnn ->135.782
Результат: 782.135
Другие вопросы из категории
2)Привести примеры циклов ( не менее 3 примеров )
3)Когда используют цикл?
кепки - золотистая и в горошек. Сколько различных нарядов можно составить для Гоши?
1.умножь на 3
2.вычти 4
Первая из них утраивает число на экране, вторая уменьшает его на 4.
Составьте алгоритм получения из числа 5 числа 17, соденржащие не более 5 команд.
(Например,21221-это алгоритм
вычти 4
умножь на 3
вычти 4
вычти 4
умножь на 3
который реобразует число 10 в 30.)
Если таких алгоритмов более одного, то запишите любой из них.
человек, оба языка 18 человек.
Сколько учеников:
1) изучают только английский?
2) изучают только французский?
3) сколько учеников в классе?
Составить блок схему и программу , которая 10 раз выводит на экран ваши имя и фамилию.
Читайте также
программу на Паскале, в которой вычисляются четыре величины: средние температуры зимних месяцев, весенних месяцев, летних и осенних. 2)Вы посетили магазин и купили 10 видов товара. В таблицу T [1..10] записали количество купленного товара каждого вида. В таблицу C [1..10] записали цену единицы каждого вида товара соответственно. Составить программу на Паскале вычисления общей стоимости всех покупок.
Даны натуральное число n и вещественные числа a1, a2, ..., an. Определить среднее арифметическое вещественных чисел...
ПАСКАЛЬ,ПОМОГИТЕ ПОЖАЛУЙСТА
Простейшая программа на Паскале будет выглядеть следующим образом:
program upr;
begin
writeln ( ? ); {оператор вывода строки}
end.
Определи, какая фраза пропущена на месте вопросительного знака?
’Hello, World!’
“Lorem ipsum”
Just Another Perl Hacker
ПОЖАЛУЙСТА,ХОТЯ БЫ НА ПАСКАЛЕ СОСТАВЬТЕ!
Задали написать программу на язвке паскаль:вычислить и вывести на экран 8 первых элементов ряда если каждый элемент задан формулой а1= i/sin*i