Есть ответ 👍

Дано четырехзначное число. Составь программу, которая находит сумму второй(сотня) и четвертой(единица) цифры этого четырехзначного числа

136
203
Посмотреть ответы 2

Ответы на вопрос:


2565 5 2

Объяснение:

Вроде так точно не знаю


Const    d: real = 10; // число км в день    p: real = 1.12; // %    m: integer = 30; // число дней в месяце    n: integer = 25; // макс дистанция в условии var c: integer;     s, x: real; begin    x : = d;     for c : = 1 to  m   do begin        s : = s + x;         x : = x * p;     end;     writeln('в месяц пробегает: ', s);           x : = d; c : = 0;     while (x < n) do begin        c : = c + 1;         x : = x * p;     end;     writeln('нужно ', c, ' дней'); end.

Популярно: Информатика