maria
?>

Яким є порядок розв'язування задач, у яких передбачено опрацювання деякої сукупності даних? 2. Як зміни елементів масиву мовою програмування Free Pascal, а які — мовою програмування Python? Чи можна вважати, що за зміни табличних величин одна мова переважає іншу?

Информатика

Ответы

metegina4
Простая

Program p;
var ch:real;   
         i:integer;
begin 
ch:=65000; 
For i:= 1993 to 2013 do
      begin   
         ch:=trunc(ch*1.03);   
         Writeln('Численность населения в году №',i+1,' равна ',ch);   
       end;
end.

Для любых данных

Program p;
var year,y1:integer;  
      ch:real;   
      i:integer;
begin
    Write('Введите начальный год: '); 
    Readln(year); 
    Write('Введите конечный год: '); 
    Readln(y1); 
    Write('Введите число населения: ');
    Readln(ch); 
    For i:= year to y1-1 do   
      begin   
          ch:=trunc(ch*1.03); 
          Writeln('Численность населения в году №',i+1,' равна ',ch); 
     end;
end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Яким є порядок розв'язування задач, у яких передбачено опрацювання деякої сукупності даних? 2. Як зміни елементів масиву мовою програмування Free Pascal, а які — мовою програмування Python? Чи можна вважати, що за зміни табличних величин одна мова переважає іншу?
Ваше имя (никнейм)*
Email*
Комментарий*