4 года назад

помогите составить цихлический алгоритм "Накачать колесо велосипеда".

Знания

Информатика

1 ответ:

ЧЕбУРаШка [397]4 года назад

0 0

K=10;
while(k>=0)
{
k-=10;
k+=10;
}

Читайте также

По заданному числу (1-12)вывести название соответствующего месяца решить задачу в паскале 1 постановка задачи Величины:N-месяц и

Metior84

Var
    a: array[1..12]of string := ('январь', 'февраль', 'март', 'апрель', 'май', 'июнь', 'июль', 'авгус', 'сентябрь', 'октябрь', 'ноябрь', 'декабрь');
    k: integer;

begin
    readln(k);
    writeln(a[k]);
end.

0 0

2 года назад

Программа берет от пользователя одно число. Пишет четное оно или нет и выдает последнюю цифру числа

любовь арсенина [5.2K]

И что же мы должны отвечать? Где вопрос?

0 0

4 года назад

Вуз опубликовал в интернете на сайте vuz2020. ru список школ, с которыми он сотрудничает. Имя файла, содержащего список, - list,

ВлаДислав70 [7]

Ответ:

я когда то решал это я использовал ответ 4

Объяснение:я уже не помню но вроде этот ответ был правильный

0 0

4 года назад

1) Известны оценки ученика по 10 предметам. Найдите среднюю оценку 2) Дано натуральное число. Определить сумму 5ти его последних

GothicCrow

Const
n = 10;

var
i, s: integer;
a: array[1..n] of integer;

begin
Write('Введите оценки через пробел ');
s := 0;
for i := 1 to n do
begin
    Read(a[i]);
    s := s + a[i]
end;
Writeln('Средний балл равен ', s / 10:0:2)
end.

Тестовое решение:

Введите оценки через пробел 4 5 3 4 4 5 3 5 5 4
Средний балл равен 4.20

var
k, n: longint;
i, m, s: integer;

begin
Write('Введите натуральное число '); Readln(n);
m := n mod 100000;
k := 10000;
for i := 1 to 4 do
begin
    s := s + (m div k);
    m:=m mod k;
    k := k div 10
end;
s:=s+m;
Writeln('Сумма последних пяти цифр числа равна ', s)
end.

Тестовое решение:

Введите натуральное число 123456789
Сумма последних пяти цифр числа равна 35

0 0

4 года назад

Прочитать ещё 2 ответа

Сколько секунд потребуется обычному модема, передающему сообщения, со скоростью 2880 бит/с, чтобы передать цветное растровое изи

bort205 [79]

10--15секунд понадобится

0 0

4 года назад