сервис вопросов и ответовПаскаль, помогите решить задачу
5-9 класс|
|
Прикрепленные изображения
Hermione23
05 авг. 2016 г., 8:39:11 (7 лет назад)
Verunyasvetlichnaya
05 авг. 2016 г., 10:17:08 (7 лет назад)
var
a, b, c : Integer;
begin
Write('Vvedite 1 chislo: '); ReadLn(a);
Write('Vvedite 2 chislo: '); ReadLn(b);
Write('Vvedite 3 chislo: '); ReadLn(c);
if b > a then a := b;
if c > a then a := c;
Writeln('Naibolshee chislo: ', a);
Writeln('Kvadrat chisla: ', sqr(a));
end.
пухова
05 авг. 2016 г., 13:02:02 (7 лет назад)
var a, b, c, max: integer;
begin
readln(a, b, c);
if (a >= b) then
max := a
else
max := b;
if (c > max) then
max:=c;
write(sqr(max));
readln;
end.
Ответить
Другие вопросы из категории
в игре крестики-нолики на поле 4 на 4 после хода первого игрока второй игрок получил информацию, ко-во которой равно:
1) 1 байт
2) 4 бита
3) 4 байта
4) 16 бит
Какие из перечисленных объектов являются элементами компьютерного интерфейса?
А) Окна
Б) Экранные кнопки
В) Рабочий стол
Г) Панель задач
Д) Меню
Сколько страниц текста
(60 строк по
55 символов) можно
записать на дискету емкостью 720 Кб - _____________
Определите
информационный объем книги в 500 страниц, если на каждой странице
размещается 60 строк по 55 символов в каждой строке?
3.
помогите нарисовать блок схему к АЛГОРИТМУ: Если Павлик дома, будем решать задачи по математике. В противном случае следует позвонить Марине и вместе
готовить доклад по биологии. Если же Марины нет дома, то надо сесть за сочинение.
Читайте также
PASCAL. нужна помощь. ПОЖАЛУЙСТА помогите решить задачу в PASCAL (если рОЧЕНЬ нужна помощь. ПОЖАЛУЙСТА помогите решить задачу в PASCAL (если решиш - проси
что угодно, помогу)Вот задача - Под конец учебного года ученики 11 класса решали понять у кого же из них будет самый высокий средний балл ? Известно , что - в классе учится 14 учеников, - Сумма всех средних баллов аттестата = 100.Известно также , что первый ученик имел средний балл, который составляет 1/ 12 суммы всех средних баллов. Второй ученик - на 0,15 % больше, чем первый ученик , но на 1,75 % меньше , чем третий ученик . Средние баллы аттестатов двух сестер были равными среднему арефметичному оценок вышеупомянутых учеников , разделенном на 1.5 . Четвертый ученика на конец года имел такой же балл , как и первый ученик , но на 5% меньше , а остальные ученики - имели равные баллы .Какой средний балл на конец года получил каждЫй?
Помогите решить задачи , Плииииз !!!! 1)Семья , состоящая из дедки , бабки , внучки , жучки , кошки , выращивает репу . Потребуется ли им привлечение
мышки для сбора урожая ИСХОДНЫЕ ДАННЫЕ ______________________ 2)Малыш и карлосон решили по-братски разделить два сладких орешка-болльшой и маленький . Как это сделать ? Помогите плиз , заранее спасибо :) надеюсь на вас ! Просто я непоняла что с исходными данными делать .
Пожалуйста помогите решить задачу по информатике!
Задача: Две
хозяйки купили 8 литров молока. У одной 5 литров в 6- литровом бидоне, у
другой 3 литра в 5 - литровом бидоне. Они решили разделить всё молоко
поровну, по 4 литра, пользуясь ещё одним, 2 - литровом бидоном. Как это
сделать?
Паскаль, помогите!!!
Дан фрагмент программы, который решает задачу поиска номера последней минимальной цифры в записи десятичного целого числа (считается, что цифры в числе пронумерованы справа налево) и выводит ее на экран. Определите, какой оператор необходимо вставить вместо троеточия ( . . . ), чтобы правильный результат выдавался для любого целого числа N. Все используемые переменные имеют целый тип данных. Ответ записывайте без пробелов.
на языке Паскаль
readln(N);
MC:=9; I:=0; K:=1; N:=abs(N);
while N< >0 do
begin
С:=N mod 10; N:=N div 10;
I:=I+1;
if ... then
begin
MC:=C; K:=I;
end;
end;
writeln(K); .
10 минут осталось, подалуйста.
Вы находитесь на странице вопроса "Паскаль, помогите решить задачу", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.