Регистрация
TUBERSUSLIK
10.02.2022 05:33
Информатика
Есть ответ 👍

Задание 2 Укажите правильный ответ. Для исполнения действий в алгоритме по порядку друг за другом
нужно использовать
1. ветвление
2. цикл
3. линейные команды
4. подпрограмму
ответ:​

163
181
Посмотреть ответы 1

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

анастасия1571
анастасия1571
4,5(79 оценок)

var

 cnt, i :integer;

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

 begin

   randomize;

   cnt := 0;

   for i := 1 to 100 do

     begin

     a[i] := random(300) + 1;

     write(a[i], ' ');

     if a [i] mod 10 = 8 then

       cnt := cnt + 1;

     end;

   writeln;

   writeln('Количество чисел, которые оканчиваются на 8: ', cnt);

 end.

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