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

From AsIsWiki
Revision as of 14:28, 4 April 2015 by Alex (Talk | contribs)

(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
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++

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

void main(void) {

    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, sn);

    getch();
}


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