Определить средний рост учеников класс. В классе n учеников, рост каждого находится в указанном отрезке. (бейсик)
Вариант 21


 Определить средний рост учеников класс. В классе n учеников, рост каждого находится в указанном отр

Ответы

var a,b: integer;

is7: boolean;

begin

    readln(a);

    b: =0;

    is7: =false;

    while a < > 0 do

    begin

        b: =b+a mod 10;

        if a mod 10 = 7 then

            is7: =true;

        a: =a div 10;

    end;

    wrtieln('сумма цифр: ', b);

    write('цифра 7 ');

    if is7 then writeln('есть') else writeln('нет');

    readln;

end.

как правильно пишется триугольник или треугольник?

  треугольник

1

program xxx;

    var n : integer;

begin

    write('введите число n=');

    readln(n);

    if n mod 2 = 0 then write('четное') else write ('нечетное');

    realdn

end.

 

2

program xxx;

    var n : integer;

begin

    write('введите число n=');

    readln(n);

    e : = n mod 10

    if e = 7 then write('заканчивается на 7') else write ('не заканчивается на 7');

    realdn

end.

 

Найдено 2 ответ(ов)
Показать ответы


Знаешь ответ?

Похожие вопросы:

залить в кувшин 3-х литровый воды до полна,перелить её в кувшин ёмкостью 8 литров.эту операцию проделать 3 раза,тогда в маленьком кувшине останется ровно литр воды.вылить всё из бо...Подробнее
ответов: 3
в древнем египте наряду со значками , обозначавшими целые понятия и слова, существовали и другие знаки, обозначавшие слоги и даже отдельные звуки . потребность в таких знаках очеви...Подробнее
ответов: 3
если 2 сервера за 2 секунды могут обработать 2 миллиона запросов, то один сервер за 2 секунды обрабатывает 1 миллион запросов. тогда за 6 секунд 1 сервер обрабатывает  1*3 =...Подробнее
ответов: 4
Популярные вопросы