В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
nikitinaani19
nikitinaani19
28.03.2021 04:49 •  Информатика

Практична робота з теми :"Табличний процесор" ,до іть будь ласка з вислугою ,якщо дано ,що : вислугу обчислювати за умовою :стаж менше 5 років - 10% від заробленого ,від 5 до 10 років - 15% ,від заробленого в іншому випадку 22% . просто формулу можна


Практична робота з теми :Табличний процесор ,до іть будь ласка з вислугою ,якщо дано ,що : вислугу

Показать ответ
Ответ:
klochkovanastsy
klochkovanastsy
27.05.2020 22:12
Using System;using System.Collections.Generic;using System.Linq;using System.Text;using System.Threading.Tasks;
namespace ConsoleApp1{    class Program    {        static void Main(string[] args)        {            int b = Convert.ToInt32(Console.ReadLine());            Console.WriteLine("Квадраты от 10 до"+ b);            for (int i = 10;i<=b;i++)            {                Console.WriteLine(i*i);            }            int a = Convert.ToInt32(Console.ReadLine());            Console.WriteLine("Кубы от"+ a +"до 50");            for (int i = a; i <= 50; i++)            {                Console.WriteLine(i * i * i);            }            Console.WriteLine("Целые числа от "+(a<b?a:b)+"до"+ (a < b ? b : a));            if (a<b)                     {                for (int i = a; i <= b; i++)                {                    Console.WriteLine(i);                }            }            else            {                for (int i = b; i <= a; i++)                {                    Console.WriteLine(i);                }            }            Console.ReadKey();        }    }}
0,0(0 оценок)
Ответ:
GRISHINANASTYA
GRISHINANASTYA
10.10.2021 05:29

program Picture;
uses Graph;
const
PathToDriver = 'D:\BP\bgi'; {подставьте свой путь к каталогу с файлами *.bgi}

var Gd,Gm : Integer;

begin
DetectGraph(Gd, Gm); {определим драйвер и режим}
InitGraph(Gd, Gm, PathToDriver); {проинициализируем графику}
if GraphResult <> grok then Halt(1); {если ошибка, завершим работу}

SetViewPort(0,0,639,349,ClipOn); {установим область рисования}
ClearViewPort; {очистим область рисования}

{для рисования используем следующие процедуры}
{Circle(X,Y,R) - рисует окружность}
{MoveTo(X,Y) - перемещает указатель в заданную точку}
{LineTo(X,Y) - проводит линию от указателя до заданной точки,}
{ указатель перемещает в конец линии}
{Rectangle(X1,Y1,X2,Y2) - рисует прямоугольник}
{PutPixel(X,Y,Color) - ставит точку в позиции с заданным цветом}

{человечек}
Circle(170, 225, 5);
MoveTo(170, 230);
LineTo(170, 260);
MoveTo(160, 240);
LineTo(170, 250);
LineTo(180, 240);
MoveTo(160, 270);
LineTo(170, 260);
LineTo(180, 270);

{домик}
MoveTo(230, 270);
LineTo(230, 320);
LineTo(290, 320);
LineTo(290, 270);
LineTo(260, 220);
LineTo(230, 270);
LineTo(290, 270);
MoveTo(250, 320);
LineTo(250, 290);
LineTo(270, 290);
LineTo(270, 320);
PutPixel(265, 305, White);

{дерево}
Circle(345, 175, 45);
Rectangle(340, 220, 350, 320);

ReadLn; {задердка для просмотра}
CloseGraph; {выход из графического режима}
end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота