4 года назад

Дано трехзначное число. Используя одну операцию деления нацело, вывести первую цифру данного числа (сотни). ( записать в PHP)

Знания

Информатика

1 ответ:

loxa4 года назад

0 0

<?php
$x = 123/100;
$x= (int)$x;
echo $x
?>

Читайте также

Файл размером 1200 Кбайт передаётся через некоторое соединение в течение 20 секунд. Определите размер файла (в Кбайт), который м

Nika1998

1200/20=60кб/сек
60*30=1800кб
Ответ: размер файла составляет 1800 кб

0 0

3 года назад

Три друга Алеша, Боря и Витя учатся в одном классе. Один из них ездит домой из школы на троллейбусе, другой-на трамвае, и третий

Daniil178511

Не вижу и малейшего отношения к программированию.
Что именно вы хотите видеть в программном коде ?

Ответ:
Алеша, Боря, Витя.
Алеша с кем-то идет к троллейбусу, когда подходит с ним к остановке появляется третий друг, который кричит из окна Боре (Значит Алена шел с Борей к троллейбусу). Исходя из этого Витя ездит на автобусе. Боря на троллейбусе (ибо он проводил друга до остановки, значит сам не поехал на троллейбусе, т.к. тогда было бы "вместе" шли или подобное), а значит троллейбус ему не нужен, а нужен трамвай.

Ответ:
Витя - автобус
Боря троллейбус
Алеша - трамвай.

Все. Что тут еще программировать, а ? это задача только на логику, а не на программирование..

0 0

4 года назад

Помогите Пожалуйста!!Буду очень Благодарна!!♥ Придумать задачу на подсчет элементов по определенному признаку введенных с клавиа

Владос01

Var a,b,i,k:integer
begin
readln(a);
for i:=1 to a do begin
readln(b);
if b>0 then
k:=k+1;
end;
writeln('кол-во положительных чисел = ',k);
end.
В этой программе считается сумма положительных чисел среди введенных

0 0

4 года назад

Каково будет значение переменной X после выполнения операций присваивания? X=2 Y=4 Y=X*X+X X=Y*Y-X*X

Danissimo [31]

1) 2*2+2=6;
2)6*6- 2*2=36-4=32
ответ 32

0 0

4 года назад

В паскале. В массиве хранится информация о стоимости каждого из 50 марок легковых автомобилей Определить, сколько стоит самый до

tovicenuf

Const
   N = 50;
Var
   M:array[1..N] of longint;
   i,Max:integer;
Begin
Randomize;
WriteLn('Цены(в рублях): ');
Max:=1;
For i:= 1 to N do
    Begin
    M[i]:=random(9900001)+100000;
    WriteLn(M[i]);
    if M[i] > M[Max] then Max:=i;
    End;
WriteLn('Max = ',M[Max]);
End.

0 0

4 года назад