М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
khamidova3053
khamidova3053
12.12.2020 01:20 •  Информатика

Нужно перевести на си program prog; uses crt; const n = 10; var a: array[1..n] of integer; i: integer; count: integer; b egin clrscr; randomize; count : = 0; for i : = 1 to n do begin a[i] : = random(n) + 1; write(a[i], ' '); if ((not odd(i)) and odd(a[i])) then inc(count); end; writeln; writeln('count: ', count); readkey; end.

👇
Ответ:
0katushka0
0katushka0
12.12.2020
#include <stdio.h>
#include <stdlib.h>

main(){
    #define N 10
    int i,count=0;
    int a[N];
    srand(time(0));
    for (i=0; i<N; i++) {
        a[i]=rand()%(i+1)+1;
        printf("%d ",a[i]);
        if ((i%2==0) && (a[i]%2!=0)) count++;
    }
    printf("\nCount=%d\n",count);
    system("pause");
}
4,8(97 оценок)
Открыть все ответы
Ответ:
valeria8002
valeria8002
12.12.2020

Панели инструментов в программе SketchUp — основной тип элементов управле- ния программой — блоки кнопок, эквивалентные командам меню, обеспечивающие быстрый доступ к наиболее важным и часто используемым инструментам. Эти блоки в SketchUp, как и в стандартных приложениях ОС Windows — плавающие, т. е. могут быть перемещены в любое место рабочего окна.

Вид и состав панелей инструментов настраивается в меню View | Toolbars (Вид | Панели инструментов). Давайте активируем панели инструментов, которые наиболее часто используются в SketchUp, и кратко их рассмотрим.

Объяснение:

4,5(63 оценок)
Ответ:
katyaklimovich
katyaklimovich
12.12.2020
Var N,B,k:integer;
Begin
Write('N = ');ReadLn(N);
Write('Искомые числа:');
For N:= 1 to N do
    Begin
    B:=N;
    k:=1;
    // перед каждой проверкой k:=1
    // и если число не делится на любую из своих цифр, то k:=0
    While B > 0 do
       Begin
       if B mod 10 = 0 then k:=0
       // B mod 10 - это остаток от деления B на 10
       // то есть, например, 123 mod 10 = 3
       else if N mod (B mod 10) > 0 then k:=0;
       B:=B div 10
       // целая часть от деления B на 10
       // 123 div 10 = 12
       End;
    if k = 1 then Write(' ',N)
    End;
End.
4,8(46 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ