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

Составьте программу на паскале 1. увеличьте число х на 1 , если оно положительное 2. составьте программу f=1·2·

👇
Ответ:
Gulshat51
Gulshat51
21.10.2020
1)
var x:integer;
begin
readln(x);
writeln(x+1);
end.
2)
var n,i,f:integer;
begin
readln(n);
f:=1;
for i:=1 to n do
f:=f*i;
writeln(f);
end.
4,4(46 оценок)
Открыть все ответы
Ответ:
Albinnabel
Albinnabel
21.10.2020

Контрольная работа по теме

«Компьютер как универсальное устройство обработки информации»

(информатика; 7 класс)

1. Как компьютер человеку в его ДЕЯТЕЛЬНОСТИ? КОМПЬЮТЕР НЕ МОЖЕТ НАЙТИ НЕПОНЯТНУЮ ЕМУ ИНФОРМИЦИЮ БЛАГОДОРЯ ЭТОМУ КОМПЬЮТЕР ОБЛЕГЧАЕТ ЖИЗНЬ ЧЕЛОВЕКУ

2. Какие устройства входят в состав компьютера и зачем они НУЖНЫ? МЫШКА ЧТОБЫ ДВИГАТЬ КУРСОРОМ SSS КЛАВИОТУРА ДЛЯ ПИЧАТАНЬЯ ЧЕГО ЛИБО,SSS ЖЁСТКИЙ ДИСК НА НЕМ ХРОНЯТСЯ ФАЙЛЫ, ДАННЫЕ, ИЗОБРАЖЕНИЯ И Т. Д.

3. Перечислите устройства ввода ИНФОРМАЦИИ SSS КЛАВИОТУРА МЫШКА КУРСОР

4. Перечислите устройства вывода ИНФОРМАЦИИ SSS Ы

ФЛЕШКА ЖЁСТКИЙ ДИСК

5. Из каких частей состоит имя ФАЙЛА? SSS ПРОСТИ ТУТ Я НЕ ЗНАЮ

6. Как по имени файла определить в какой программе он СОЗДАН? SSS ТАМ НАПИСАН САЙТ И СЫЛКА

7. В чём состоит различие между одноуровневой и иерархической файловой СИСТЕМАМИ? SSS НЕ ЗНАЮ СОРИ

8. Перечислите основные типы программного обеспечения компьютера. Приведите примеры ПО по типам. SSS ИНТЕРНЕТ БЫСТРЫЙ ПОИСК (ЧЕГО-ЛИБО) СОТ СЕТИ

9. К каким последствиям может привести заражение компьютера ВИРУСАМИ? SSS СБРАШЕВАНИЕ ДАННЫХ МОМЕНТАЛЬНАЯ СЕВШАЯ БАТАРЕЯ И И ЗАХВАТЫВАНИЕ АККАУНТА

10. Какие типы компьютерных вирусов СУЩЕСТВУЮТ? SSS НЕЗНАЮ

11. Каким антивирусные программы обнаруживают ВИРУСЫ? ОНИ СКАНИРУЮТ ВСЕ ПРОГРАММЫ И ЕСЛИ В ПРОГРАММЕ НЕ НОРМАЛЬНАЯ ОШИБКА ОНИ СРАЗУ ПИШУТ И ОБНАРУЖИВАЮТ

Объяснение:

СДЕЛАЙ ОТВЕТ ЛУТШИМ Я СТАРАЛСЯ

4,6(50 оценок)
Ответ:
6Darya6
6Darya6
21.10.2020
// PascalABC.NET 3.2, сборка 1362 от 14.12.2016
// Внимание! Если программа не работает, обновите версию!

function IsPrime(m:integer):=(Range(2,Round(sqrt(m))).All(x->m mod x<>0));

begin
  var n:=ReadInteger('n=');
  Range(1,n).Where(i->IsPrime(i)).Println
end.

Пример
n= 318
1 2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97 101 103 107 109 113 127 131 137 139 149 151 157 163 167 173 179 181 191 193 197 199 211 223 227 229 233 239 241 251 257 263 269 271 277 281 283 293 307 311 313 317

// PascalABC.NET 3.2, сборка 1362 от 14.12.2016
// Внимание! Если программа не работает, обновите версию!

function NOD(m,n:integer):integer;
begin
  while n>0 do (m,n):=(n,m mod n);
  Result:=m
end;

begin
  var a,b:integer;
  Write('Введите пару натуральных чисел:'); Read(a,b);
  Writeln('НОД=',NOD(a,b))
end.

Пример
Введите пару натуральных чисел:7955 5661
НОД=37

Синформатикой, . 1. напишите программу, которая выводит на экран все простые числа в диапазоне от 1
4,7(20 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ