Журналист
Фаддеевич 24 октября 2019 в 01:24

Помогите решить задачи

Задача 5.2

var
  t,z:real;
begin
  Write(t=); Read(t);
  if tgt;2 then z:=16*t else z:=Abs(t*t-4);
  Writeln(z=,z)
end.

Задача 5.3

var
  x,y:real;
begin
  Write(x=); Read(x);
  if xgt;=5 then y:=Sqrt(x-5)
  else
    if xgt;=-20 then y:=Abs(x-15)
    else y:=x*x-400;
  Writeln(y=,y)
end.
Using System;using System.Collections.Generic;using System.Linq;using System.Text;using System.Threading.Tasks;namespace ConsoleApplication1{    class Program    {        static void Main(string[] args)        {            int a;            double z;            a = int.Parse(Console.ReadLine());            if (a gt; 2) {                 z = 16 * a;                Console.WriteLine("z= " + z);                Console.ReadKey();            }            else if (a lt;= 2) {                 z = Math.Abs(Math.Pow(a, 2) - 4);                Console.WriteLine("z= " + z);                Console.ReadKey();            }                    }    }}
Компьютеры и вычисления
Для комментирования необходимо зарегистрироваться на сайте