Задать вопрос
1 июня, 16:42

Дан массив значений расстояния L в сантиметрах. Преобразовать значения, превышающие 100 см в метры, и округлить до целых.

Ответы (1)
  1. Т
    1 июня, 19:47
    0
    Uses crt;

    const

    N=30;

    var L:array [1 ... N] of integer;

    i:integer;

    begin

    for i:=1 to N do

    begin

    readln (L[i]) ;

    if L[i]>=100 then L[i]:=trunc (L[i]) ;

    end;

    for i:=1 to N do write (L[i]:3) ;

    end.

    {но в выводе он наравне с метрами будет выводить и не преобразованные сантиметры}
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Дан массив значений расстояния L в сантиметрах. Преобразовать значения, превышающие 100 см в метры, и округлить до целых. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
дан массив значений расстояния L в см. преобразовать значения превышающие 100 см. в метры и округлить до целых
Ответы (1)
1) Дан массив из n элементов. Найти номер наименьшего элемента массива. 2) Дан массив из n элементов. Упорядочить массив по возрастанию. 3) Дан массив из n элементов. Упорядочить массив по убыванию.
Ответы (1)
Хотя бы 3-4 задачи! 1) Дан одномерный целочисленный массив размерностью N. Найдите количество элементов, которые кратны 3 (5). 2) Дан одномерный целочисленный массив А, состоящий из N элементов. Найти сумму всех четных элементов массива.
Ответы (1)
Задачи на массив (паскаль) : Массив (подсчёт суммы) а) Дан массив целых чисел. Найти сумму нечётных элементов. б) Дан массив. Определить максимальный и минимальный элемент.
Ответы (1)
В массив вводят размеры n файлов (в байтах) от 100 до 9000. Преобразовать все значения превышающие 1024 байта в килобайты
Ответы (1)
Войти
Задать вопрос