Ludacris66
20.05.2020 09:40

Вы поместили на счет в банк x руб. на n лет под 3% годовых. какая сумма будет на вашем счету через 1, 2, 3, n лет?
введите вклад? 100
введите срок? 5
1 год - 103 руб
2 год - 106,09 руб

5 год - 115,92 руб

написать программу, паскаль

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Ivan700076
25.01.2022 20:17

using System;

using System.Linq;

using System.IO;

namespace LearnCSharp

{

   class Program

   {

       static void Main(string[] args)

       {

           string str, str2;

           StreamReader reader = new StreamReader("1.txt");

           str = reader.ReadLine();

           int[] x = str.Split(' ').Select(n => Convert.ToInt32(n)).ToArray();

           reader = new StreamReader("2.txt");

           str2 = reader.ReadLine();

           int[] y = str2.Split(' ').Select(n => Convert.ToInt32(n)).ToArray();

           reader.Close();

           x = x.Concat(y).ToArray();

           Array.Sort(x);

           File.WriteAllText("3.txt", string.Join(" ", x));

       }

   }

}

Я честно говоря не знаток C# но я проверил у меня все работает

0,0(0 оценок)
Ответ:

var i,j,k,m,uk,ind: integer;

   s,sb: string;

   a: array[1..100] of string;

   priz: boolean;

begin

 write('строка: '); readln(s);

 uk:=0;

 k:=1; m:=1;

 for i:=1 to length(s) do

 begin

   if (s[i]=' ') or (i=length(s)) then  

   begin

     sb:='';

     for j:=m to k-1 do sb:=sb+s[j];  

     priz:=true;

     if uk>0 then

     begin

       for j:=1 to uk do  

       if sb=a[j] then

       begin

         priz:=false;

         ind:=j;

         break;

       end;  

     end;  

     if priz then

     begin

       uk:=uk+1;  

       a[uk]:=sb;    

       write(uk,' ');

     end

     else write(ind,' ');

     m:=i+1; k:=m-1;

   end;

   k:=k+1;

 end;

end.


строка: Саша шел по дороге шел Саша шел и упал упал и заплакал.

1 2 3 4 2 1 2 5 6 6 5 7

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота