Практикум по программированию. Основы. Ввод и вывод. Сумма вклада

From AsIsWiki
Revision as of 09:10, 10 March 2016 by Alex (Talk | contribs)

Jump to: navigation, search

Назад · Задачи · Дальше


Contents

Java

import java.util.Scanner;
import java.lang.Math;

public class Task05 {

    public static void main(String[] args) {
        
        Scanner in = new Scanner(System.in);
        
        System.out.println();
        System.out.println(" Расчет суммы трехпроцентного вклада");
        System.out.println("-------------------------------------");

        System.out.print(" Введите сумму вклада (в рублях): "); 
        double s = in.nextDouble();

        System.out.print(" Введите срок вложения (в годах): "); 
        int n = in.nextInt();

        System.out.println("-------------------------------------");
                            
        double sn = s * Math.pow(1.03, n);

        System.out.printf(" Через %d лет сумма увеличится до %.2f рублей\n", n, sn);
    }
}


C++

// g++ 4.2

#include <iostream>
#include <math.h>

using namespace std;

int main() {
    
    double s;
    int n;
    
    cout << "\n Расчет суммы трехпроцентного вклада\n";
    cout << "-------------------------------------\n";
    
    cout << " Введите сумму вклада (в рублях): ";
    cin >> s;
    
    cout << " Введите срок вложения (в годах): ";
    cin >> n;
    
    cout << "-------------------------------------\n";
    
    double sn = s * pow(1.03, n);
    
    printf(" Через %d лет сумма увеличится до %.2f рублей\n\n", n, sn);
    
    return 0;
}


Pascal

program Task05;
    var
        s, sn: real;
        n: integer;
begin
    writeln;
    writeln(' Расчет суммы трехпроцентного вклада');
    writeln('-------------------------------------');

    write(' Введите сумму вклада (в рублях): ');
    readln(s);

    write(' Введите срок вложения (в годах): ');
    readln(n);

    writeln('-------------------------------------');

    sn := s * exp(n * ln(1.03));

    writeln(' Через ', n, ' лет сумма увеличится до ', sn:0:2, ' рублей');

    readln;
end.



Назад · Задачи · Дальше

Personal tools
Namespaces

Variants
Actions
Navigation
Tools