Предмет: Қазақ тiлi, автор: 111291

Сурактарга жауап бер. Бул кандай дукен? Дукенде не бар?

Ответы

Автор ответа: pav2017
1
Бұл қандай дүкен ?
Бұл азық-түлік дүкені.Ол   өте үлкен.әдемі дүкен.
Дүкенде не бар?
Дүкенде сүт тағамдары.,ет тағамдары, үннан жасалған тағамдар.,тағы да басқа тағамдар бар.
Похожие вопросы
Предмет: Алгебра, автор: kyznitsov17vladislav
Предмет: Химия, автор: olgateslenko16
Предмет: Другие предметы, автор: krlh01
Предмет: Информатика, автор: katem1981
Дана не пустая последовательность целых чисел, оканчивающаяся нулём. Найдите сумму всех чётных чисел, кратных 3.

program Z1;
var
ch,s:integer;
begin
writeln('введите последовательность натуральных чисел, оканчивающихся 0);
readln(ch);
s:=0;
while ch<>0 do
begin
if not(odd(ch)) and (ch mod 3=0)then s:=s-ch:
readln (ch) ;
end;
writeln (' s='s) ;
end

2.Дана не пустая последовательность целых чисел, оканчивающаяся нулём. Найдите минимальное число этой последовательности, исключая последний ноль.

var
min ch:integer ;
begin
writeln (' введите последовательность натуральных чисел, оканчивающихся 0';)
readln (ch)
min:=ch ;
while ch<>0 do
begin
if (ch<min) and (ch<>0)then min :=ch :
readln (ch) ;
end;
writeln ('min =', min) ;
end

Домашнее задание.
1. Дана не пустая последовательность целых чисел, оканчивающаяся нулём. Найдите количество всех нечётных чисел, оканчивающихся цифрой 3.
2. Дана не пустая последовательность целых чисел, оканчивающаяся нулём. Найдите максимальное число этой последовательности.