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

1. Даны стороны двух квадратов A и B. Площадь какого больше - первого или второго. 2. Вычислите наименьшее из 3-х заданных чисел.
Все программы в паскаль АБС.

👇
Ответ:
Matveystori
Matveystori
26.04.2020

Pascal

Объяснение:

1 program tri;

2 var a,S:real;

3 begin

4 writeln('vvedite storony kvadrata');

5 readln (a);

6 s:=a*a;

7 writeln ('ploshad ravna=',s);                          

8 emd.

4,6(42 оценок)
Открыть все ответы
Ответ:
АлияКью
АлияКью
26.04.2020
// PascalABC.NET 3.3, сборка 1599 от 17.12.2017
// Внимание! Если программа не работает, обновите версию!

function sn(n:integer):integer; // сумма цифр числа
begin
  n:=Abs(n);
  Result:=0;
  while n>0 do begin
    Result+=n mod 10;
    n:=n div 10
    end
end;

begin
  var (n,a,b):=ReadInteger3('Введите n,a,b через пробел:');
  var m:=ArrRandom(n,a,b); m.Println;
  var k:=ReadInteger('k=');
  Writeln('Найдено чисел: ',m.Where(t->sn(t)=k).Count)
end.

Пример
Введите n,a,b через пробел: 15 -50 60
43 2 42 -26 -34 57 45 44 29 -41 -4 1 -17 38 -19
k= 7
Найдено чисел: 2
4,6(7 оценок)
Ответ:
creator4567
creator4567
26.04.2020

Текстовые редакторы (Блокнот, Sublime Text, Notepad++) предназначены для редактирования непосредственно текстовой информации

Текстовые процессоры (MSO Word, OO Writer) могут редактировать не только текст, но так же его представление - форматирование. Так же в документ можно вставлять таблицы, рисунки и т.п.


Для облегчения руттиной работы в текстовых редакторах и процесорах есть поиск и замена в том числе по регуляным выражениям, макросы, автодополнение, автоматическое форматирование для языков программирования, автоматичесое выделение ошибок, автозамена, готовые шаблоны и т.д.

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