Задать вопрос
21 июня, 23:05

Составить программу вычисления 1.1+1.2+1.3 + ... + 2.1, вывести на печать результат

+5
Ответы (1)
  1. 22 июня, 00:34
    0
    begin

    //1 вариант

    Partition (1.1, 2.1, 10). Sum. Println;

    //2 вариант

    Range (11, 21). Aggregate (0.0, (Sum, x) - > Sum + x / 10). Println;

    //3 вариант

    Range (11, 21). Select (x->x/10). Sum. Println;

    //4 вариант

    var Sum : = 0.0;

    foreach var x in Range (11, 21) do

    Sum + = x / 10;

    Sum. Println;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Составить программу вычисления 1.1+1.2+1.3 + ... + 2.1, вывести на печать результат ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Задача 1 - Дано целое число. Если оно положительное, вывести " Число положительное ", если отрицательное вывести "Число отрицательное ", если равно 0 - "Число равно нулю" задача 2 - дано целое число.
Ответы (1)
1. Напишите программу вычисления расстояния между двумя точками плоскости. 2. Напишите программу вычисления площади боковой поверхности куба. 3. Напишите программу вычисления площади и гипотенузы прямого треугольника, если известны его катеты. 4.
Ответы (1)
Используя язык программирования Паскаль выполнить задание: 1. Составить программу для вычисления y=38x+231. 2. Составить программу для вычисления M=7x+6y+276. 3. Составить программу для вычисления N=4a2+2xa+8y.
Ответы (1)
Дан массив А (м), м меньше или равно 20. Вывести на печать сумму элементов массива. если она превосходит число 50, в противном случае вывести в печать исходный массив.
Ответы (1)
Pascal. Даны массивы A (m) и Y (m), m≤16. Найти сумму S : S=A1Ym+A2Ym-1 + ... + AmY1. Если S
Ответы (1)