Ответ:
а) Программа
б) "Пуск"
в) ОС (операционная система)
г) "Окно"
Объяснение:
а) Программа - это алгоритм или набор команд, которые компьютер должен обработать, программа позволяет управлять компьютером
б) Так называется главное меню в ОС Windows
в) ОС это набор программ для управления компьютером
г) "Окно" от названия ОС Windows, любой интерфейс программы это окно
Var
a,p,s:real;
begin
Write('Введите площадь квадрата: ');
Readln(s);
a:=sqrt(s);
p:=4*a;
Writeln('Периметр квадрата равен ',p)
end.
Тестовое решение:
Введите площадь квадрата: 13.7
Периметр квадрата равен 14.8054044186574
Using System;
namespace Fractions{ public struct Fraction : IComparable<Fraction> { public Fraction(int numerator, int denominator) { Numerator = numerator; Denominator = denominator; }
public int Numerator; public int Denominator;
public int CompareTo(Fraction other) { return (Numerator * other.Denominator).CompareTo(other.Numerator * Denominator); } }
public class Program { static void Main(string[] args) { int numerator, denominator;
Console.Write("Числитель первой дроби "); numerator = int.Parse(Console.ReadLine()); Console.Write("Знаменатель первой дроби "); denominator = int.Parse(Console.ReadLine()); var fraction1 = new Fraction(numerator, denominator);
Console.Write("Числитель второй дроби "); numerator = int.Parse(Console.ReadLine()); Console.Write("Знаменатель второй дроби "); denominator = int.Parse(Console.ReadLine()); var fraction2 = new Fraction(numerator, denominator);
var compareResult = fraction1.CompareTo(fraction2); if (compareResult < 0) Console.WriteLine("<"); else if (compareResult > 0) Console.WriteLine(">"); else // = 0 Console.WriteLine("="); } }}
1,2,3,4,5,6,7
Всегда пожалуйста.
<em>// PascalABC.NET 3.2, сборка 1387 от 20.02.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(ReadInteger('n='),-2,2); a.Println;
Writeln('Положительных: ',a.Where(x->x>0).Count)
end.
<u>Пример</u>
n= 15
1 -1 -1 2 0 2 2 -2 -2 0 -1 -1 -2 1 1
Положительных: 6