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

Написать код на java 1. Напишите класс, который вначале принимает с клавиатуры целое положительное число (в переменную х). Затем класс выводит на экран в строку серию из 17 целых положительных чисел, отвечающую следующим условиям:
1) серия начинается с числа, большего х на 1;
2) каждое число в серии (начиная со второго) больше предыдущего на 1
Числа должны отделяться друг от друга знаком «пробел». Перед началом и после окончания вывода серии чисел на экран вывода следует вывести текстовые сообщения (по выбору).

2.Напишите класс, который вначале принимает с клавиатуры целое

положительное число (в переменную х). Затем класс выводит на экран в строку серию из 17 целых положительных чисел, отвечающую следующим

условиям:

1) серия начинается с числа, меньшего х на 10;

2) каждое число в серии (начиная со второго) меньше предыдущего на 6
Числа должны отделяться друг от друга знаком «пробел». Перед началом и после окончания вывода серии чисел на экран вывода следует вывести текстовые сообщения (по выбору).

3.Подрабатывая в течение года, Вася собрал себе определенную сумму на поездку за границу, а родители добавили ему от себя еще некоторую сумму.

Напишите класс, который принимает с клавиатуры три значения: первое -

сумма в рублях, заработанная Васей, второе - сумма в рублях, которую ему

дали родители, третье - курс рубля по отношению к евро. Класс должен

подсчитать и вывести на экран сумму в евро, которая имеется у Васи для

поездки за границу.

👇
Открыть все ответы
Ответ:
Ani32536
Ani32536
21.11.2022

ответ: окей

объяснение:

для квадрата:

procedure tform1.button1click(sender: tobject);

var

a,b,c,d,p,s: real;

begin

a: =2; b: =2; c: =2; d: =2;

if ((a=b)and(c=d)and(a=d))then

begin

p: =(a+b+c+d)/2;

s: =sqrt((p-a)*(p-b)*(p-c)*(p-d));

showmessage('s='+floattostr(s));

end else showmessage('это не квадрат');

end;

для треугольника:

procedure tform1.button1click(sender: tobject);

var

a,b,c,p,s: real;

begin

a: =2; b: =2; c: =3;

if (abs(a-b)

begin

p: =(a+b+c)/2;

s: =sqrt(p*(p-a)*(p-b)*(p-c));

edit1.text: =floattostr(s);

end else showmessage('не треугольник');

end;

4,5(62 оценок)
Ответ:
KaiBennet
KaiBennet
21.11.2022

ответ:

на форму поставил компонент memo

в edit1 и edit2 вводим значения строк и столбцов

для цикла for i: = for j: =

на кнопке следующий код

объяснение:

procedure tform1.button1click(sender: tobject);

  var i,j: integer; s: string;

begin

  a: = strtoint(edit1.text);

  b: = strtoint(edit2.text);

 

    for i: = 1 to a do begin

          s: = '';

    for j: = 1 to b do

      s: = s+'   '+inttostr(i*j);

      memo1.lines[i-1]: = s;

    end;

end;

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