profile
Опубликовано 6 лет назад по предмету Информатика от ДогБимка

Доброго всем вечера/дня!Пожалуйста,помогите с Информатикой

записать программу в ПАСКАЛЬ(!)

Дано вещественное число — цена 1 кг конфет. Вывести стоимость 1, 2, …, 10 кг конфет.
И если не сложно,то с подробными объяснениями!!!




Всем заранее спасибо!!!)

  1. Ответ
    Ответ дан nomathpls
    program konfety;   
        var t: real;       
             i: integer;        
    begin
        WriteLn('Введите стоимость 1 кг конфет (в рублях): ');
        Read(t);
        for i := 1 to 10 do
            WriteLn('Стоимость ', i, ' кг конфет: ', i*t);
    end.

    Смысл такой: 
    t - цена 1 кг конфет (вещественный тип real)
    i - счетчик, который будет увеличиваться на единицу после каждого выполнения тела цикла for.

    WriteLn() выводит на экран строку, которая заключена в кавычки. Не забываем ставить точку с запятой после операций.

    Read(t) дает вам возможность вписать, сколько стоит килограмм конфет, и присваивает переменной t то значение, которое мы ввели.

    Далее идет цикл for, который по сути вот что делает: 
    Для каждого целого i от 1 до 10 сделай вот что:
        Выведи на экран строку 'Стоимость ', потом значение i, потом строку 'кг конфет: ', потом число i умноженное на t

    После того, как закончишь обрабатывать все это в последний десятый раз, переходи дальше.

    А дальше у нас end (последний end. всегда с точкой).

    Конец.
    1. Ответ
      Ответ дан Аккаунт удален
      Вот это круто!
Самые новые вопросы